home *** CD-ROM | disk | FTP | other *** search
/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / misc / swave < prev    next >
ArcFS Archive  |  1995-10-01  |  16.0 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: ArcFS Archive (archive/arcFS).

You can browse this item here: swave

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert ArcFS Archive (archive/arcFS) magic Supported
100% file RISC OS archive (ArcFS format) default
99% file data default
100% TrID Acorn ArcFS Archive default
100% gt2 Kopftext: 'Archive' default (weak)
100% detectItEasy Archive: ArcFS default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 68 01 00 00 c8 01 00 00 |Archive.|h.......|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 53 57 61 76 65 00 | 00 00 00 00 ff ff ff ff |.!SWave.|........|
|00000070| 45 dc fd ff 6d a7 c5 1e | 00 00 00 00 ff ff ff ff |E...m...|........|
|00000080| 44 01 00 80 82 21 42 6f | 6f 74 00 80 ff ff ff ff |D....!Bo|ot......|
|00000090| c0 00 00 00 44 eb ff ff | 72 a8 f7 2c 03 00 9c c8 |....D...|r..,....|
|000000a0| c0 00 00 00 24 00 00 00 | 82 21 48 65 6c 70 00 80 |....$...|.!Help..|
|000000b0| ff ff ff ff e8 02 00 00 | 45 ff ff ff b8 4c b4 1e |........|E....L..|
|000000c0| 03 00 12 df e8 02 00 00 | 08 01 00 00 82 21 52 75 |........|.....!Ru|
|000000d0| 6e 00 00 80 ff ff ff ff | a1 00 00 00 44 eb ff ff |n.......|....D...|
|000000e0| 85 bd 62 12 03 00 d5 0d | a1 00 00 00 14 04 00 00 |..b.....|........|
|000000f0| 82 21 52 75 6e 69 6d 61 | 67 65 00 ff 5d 31 00 00 |.!Runima|ge..]1..|
|00000100| 44 fb ff ff 77 77 40 47 | 03 00 f6 c1 5d 31 00 00 |D...ww@G|....]1..|
|00000110| d9 04 00 00 82 21 53 70 | 72 69 74 65 73 00 ff ff |.....!Sp|rites...|
|00000120| 88 03 00 00 44 f9 ff ff | f7 12 d1 a8 03 00 8d e8 |....D...|........|
|00000130| 88 03 00 00 5a 36 00 00 | 82 53 70 72 69 74 65 73 |....Z6..|.Sprites|
|00000140| 00 ff ff ff 00 01 00 00 | 44 f9 ff ff 17 46 61 12 |........|D....Fa.|
|00000150| 03 00 79 fe 00 01 00 00 | 06 3a 00 00 82 54 65 6d |..y.....|.:...Tem|
|00000160| 70 6c 61 74 65 73 00 ff | f0 02 00 00 44 ec ff ff |plates..|....D...|
|00000170| 99 4a 61 00 03 00 48 d9 | f0 02 00 00 2a 3b 00 00 |.Ja...H.|....*;..|
|00000180| 00 39 16 02 80 18 00 80 | ff ff ff ff 03 00 38 00 |.9......|......8.|
|00000190| 44 dc fd ff c0 b0 b2 1a | 9f 96 00 00 03 00 00 00 |D.......|........|
|000001a0| 97 e9 08 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 8c 01 00 00 | 46 69 6c 65 44 61 74 61 |........|FileData|
|000001d0| 82 21 42 6f 6f 74 00 80 | ff ff ff ff c0 00 00 00 |.!Boot..|........|
|000001e0| 44 eb ff ff 72 a8 f7 2c | 03 00 9c c8 7c 20 42 6f |D...r..,|....| Bo|
|000001f0| 6f 74 20 66 69 6c 65 20 | 66 6f 72 20 53 57 61 76 |ot file |for SWav|
|00000200| 65 20 56 65 72 73 69 6f | 6e 20 31 2e 30 30 20 28 |e Versio|n 1.00 (|
|00000210| 32 32 20 46 65 62 20 31 | 39 39 32 29 0a 53 65 74 |22 Feb 1|992).Set|
|00000220| 20 53 57 61 76 65 24 44 | 69 72 20 3c 4f 62 65 79 | SWave$D|ir <Obey|
|00000230| 24 44 69 72 3e 0a 49 63 | 6f 6e 53 70 72 69 74 65 |$Dir>.Ic|onSprite|
|00000240| 73 20 3c 4f 62 65 79 24 | 44 69 72 3e 2e 21 53 70 |s <Obey$|Dir>.!Sp|
|00000250| 72 69 74 65 73 0a 0d 7c | 20 49 6e 6e 6f 63 75 6c |rites..|| Innocul|
|00000260| 61 74 65 64 20 61 67 61 | 69 6e 73 74 20 45 58 54 |ated aga|inst EXT|
|00000270| 45 4e 44 20 62 79 20 4b | 49 4c 4c 56 49 52 55 53 |END by K|ILLVIRUS|
|00000280| 20 28 76 31 2e 30 30 29 | 2c 20 57 72 69 74 74 65 | (v1.00)|, Writte|
|00000290| 6e 20 62 79 20 53 74 75 | 61 72 74 20 54 79 72 72 |n by Stu|art Tyrr|
|000002a0| 65 6c 6c 0d 7c 20 4f 4b | 0a 7c 7c ff 46 69 6c 65 |ell.| OK|.||.File|
|000002b0| 44 61 74 61 82 21 48 65 | 6c 70 00 80 ff ff ff ff |Data.!He|lp......|
|000002c0| e8 02 00 00 45 ff ff ff | b8 4c b4 1e 03 00 12 df |....E...|.L......|
|000002d0| 54 68 69 73 20 69 73 20 | 21 53 57 61 76 65 2c 20 |This is |!SWave, |
|000002e0| 76 65 72 73 69 6f 6e 20 | 31 2e 36 30 20 20 28 32 |version |1.60 (2|
|000002f0| 37 20 4a 61 6e 20 31 39 | 39 34 29 0a 0a 54 68 69 |7 Jan 19|94)..Thi|
|00000300| 73 20 69 73 20 61 20 73 | 68 6f 72 74 20 64 65 6d |s is a s|hort dem|
|00000310| 6f 6e 73 74 72 61 74 69 | 6f 6e 20 73 68 6f 77 69 |onstrati|on showi|
|00000320| 6e 67 20 73 74 61 6e 64 | 69 6e 67 20 77 61 76 65 |ng stand|ing wave|
|00000330| 73 2e 0a 0a 54 68 65 20 | 6c 6f 77 65 72 20 69 63 |s...The |lower ic|
|00000340| 6f 6e 73 20 63 61 6e 20 | 62 65 20 75 73 65 64 20 |ons can |be used |
|00000350| 74 6f 20 73 68 6f 77 20 | 68 69 67 68 65 72 20 6f |to show |higher o|
|00000360| 72 64 65 72 20 6d 6f 64 | 65 73 2e 20 54 68 65 79 |rder mod|es. They|
|00000370| 20 0a 72 65 73 70 65 63 | 74 69 76 65 6c 79 20 69 | .respec|tively i|
|00000380| 6e 63 72 65 61 73 65 20 | 74 68 65 20 6f 72 64 65 |ncrease |the orde|
|00000390| 72 20 6f 66 20 68 61 72 | 6d 6f 6e 69 63 73 20 6f |r of har|monics o|
|000003a0| 72 20 64 65 63 72 65 61 | 73 65 20 74 68 65 6d 2e |r decrea|se them.|
|000003b0| 0a 0a 54 68 61 6e 6b 73 | 20 67 6f 20 61 73 20 75 |..Thanks| go as u|
|000003c0| 73 75 61 6c 20 74 6f 20 | 50 61 75 6c 20 48 6f 62 |sual to |Paul Hob|
|000003d0| 62 73 20 77 68 6f 20 70 | 72 6f 76 69 64 65 64 20 |bs who p|rovided |
|000003e0| 20 68 65 6c 70 20 77 69 | 74 68 20 74 68 69 73 20 | help wi|th this |
|000003f0| 0a 73 6f 66 74 77 61 72 | 65 20 61 73 20 77 65 6c |.softwar|e as wel|
|00000400| 6c 20 61 73 20 68 69 73 | 20 68 69 67 68 6c 79 20 |l as his| highly |
|00000410| 72 65 63 6f 6d 6d 65 6e | 64 65 64 20 21 53 68 65 |recommen|ded !She|
|00000420| 6c 6c 20 61 70 70 6c 69 | 63 61 74 69 6f 6e 0a 0a |ll appli|cation..|
|00000430| 54 68 69 73 20 6e 6f 77 | 20 75 73 65 73 20 74 68 |This now| uses th|
|00000440| 65 20 75 73 65 72 20 73 | 70 72 69 74 65 20 61 72 |e user s|prite ar|
|00000450| 65 61 20 63 6f 72 72 65 | 63 74 6c 79 2c 20 61 6e |ea corre|ctly, an|
|00000460| 64 20 69 73 20 6d 6f 64 | 65 20 69 6e 64 65 70 65 |d is mod|e indepe|
|00000470| 6e 64 65 6e 74 0a 62 75 | 74 20 77 6f 72 6b 73 20 |ndent.bu|t works |
|00000480| 71 69 63 6b 65 73 74 20 | 69 6e 20 6d 6f 64 65 20 |qickest |in mode |
|00000490| 31 32 2e 0a 0a 54 68 65 | 20 72 65 73 75 6c 74 69 |12...The| resulti|
|000004a0| 6e 67 20 70 72 6f 67 72 | 61 6d 20 68 61 73 20 62 |ng progr|am has b|
|000004b0| 65 65 6e 20 27 73 68 72 | 75 6e 6b 27 20 75 73 69 |een 'shr|unk' usi|
|000004c0| 6e 67 0a 21 42 61 73 53 | 68 72 69 6e 6b 20 62 79 |ng.!BasS|hrink by|
|000004d0| 20 4a 6f 68 6e 20 57 61 | 6c 6c 61 63 65 2e 0a 0a | John Wa|llace...|
|000004e0| 0a 41 6e 79 20 70 72 6f | 62 6c 65 6d 73 20 6f 72 |.Any pro|blems or|
|000004f0| 20 73 75 67 67 65 73 74 | 69 6f 6e 73 20 66 6f 72 | suggest|ions for|
|00000500| 20 74 68 69 73 20 70 72 | 6f 67 72 61 6d 20 74 6f | this pr|ogram to|
|00000510| 3a 2d 0a 0a 52 2e 20 4a | 2e 20 53 65 61 67 6f 0a |:-..R. J|. Seago.|
|00000520| 0a 34 30 20 41 6c 74 6f | 6e 20 50 61 72 6b 20 52 |.40 Alto|n Park R|
|00000530| 6f 61 64 20 0a 43 6c 61 | 63 74 6f 6e 20 4f 6e 20 |oad .Cla|cton On |
|00000540| 53 65 61 20 0a 45 73 73 | 65 78 0a 0a 43 4f 31 35 |Sea .Ess|ex..CO15|
|00000550| 20 31 45 44 0a 0a 20 0a | 50 61 75 6c 20 48 6f 62 | 1ED.. .|Paul Hob|
|00000560| 62 73 20 77 68 6f 20 77 | 72 6f 74 65 20 74 68 65 |bs who w|rote the|
|00000570| 20 73 68 65 6c 6c 20 63 | 61 6e 20 62 65 20 63 6f | shell c|an be co|
|00000580| 6e 74 61 63 74 65 64 20 | 61 74 0a 52 68 65 69 6e |ntacted |at.Rhein|
|00000590| 70 66 61 6c 7a 73 74 72 | 61 73 73 65 20 32 0a 38 |pfalzstr|asse 2.8|
|000005a0| 35 30 34 39 20 49 6e 67 | 6f 6c 73 74 61 64 74 0a |5049 Ing|olstadt.|
|000005b0| 47 65 72 6d 61 6e 79 0a | 46 69 6c 65 44 61 74 61 |Germany.|FileData|
|000005c0| 82 21 52 75 6e 00 00 80 | ff ff ff ff a1 00 00 00 |.!Run...|........|
|000005d0| 44 eb ff ff 85 bd 62 12 | 03 00 d5 0d 7c 20 52 75 |D.....b.|....| Ru|
|000005e0| 6e 20 66 69 6c 65 20 66 | 6f 72 20 53 57 61 76 65 |n file f|or SWave|
|000005f0| 20 56 65 72 73 69 6f 6e | 20 31 2e 30 30 20 28 32 | Version| 1.00 (2|
|00000600| 32 20 46 65 62 20 31 39 | 39 32 29 0a 57 69 6d 70 |2 Feb 19|92).Wimp|
|00000610| 53 6c 6f 74 20 2d 6d 69 | 6e 20 38 30 4b 20 2d 6d |Slot -mi|n 80K -m|
|00000620| 61 78 20 38 30 4b 0a 49 | 63 6f 6e 53 70 72 69 74 |ax 80K.I|conSprit|
|00000630| 65 73 20 3c 4f 62 65 79 | 24 44 69 72 3e 2e 53 70 |es <Obey|$Dir>.Sp|
|00000640| 72 69 74 65 73 0a 53 65 | 74 20 53 57 61 76 65 24 |rites.Se|t SWave$|
|00000650| 44 69 72 20 3c 4f 62 65 | 79 24 44 69 72 3e 0a 52 |Dir <Obe|y$Dir>.R|
|00000660| 75 6e 20 3c 53 57 61 76 | 65 24 44 69 72 3e 2e 21 |un <SWav|e$Dir>.!|
|00000670| 52 75 6e 69 6d 61 67 65 | 20 25 2a 30 0a 46 69 6c |Runimage| %*0.Fil|
|00000680| 65 44 61 74 61 82 21 52 | 75 6e 69 6d 61 67 65 00 |eData.!R|unimage.|
|00000690| ff 5d 31 00 00 44 fb ff | ff 77 77 40 47 03 00 f6 |.]1..D..|.ww@G...|
|000006a0| c1 0d 00 0a 1d f4 20 3e | 20 3c 53 57 61 76 65 24 |...... >| <SWave$|
|000006b0| 44 69 72 3e 2e 21 52 75 | 6e 49 6d 61 67 65 0d 00 |Dir>.!Ru|nImage..|
|000006c0| 14 34 ee 20 85 20 20 eb | 31 32 3a c8 99 22 48 6f |.4. . .|12:.."Ho|
|000006d0| 75 72 67 6c 61 73 73 5f | 53 6d 61 73 68 22 3a f6 |urglass_|Smash":.|
|000006e0| 3a f1 22 20 61 74 20 6c | 69 6e 65 3a 20 22 3b 9e |:." at l|ine: ";.|
|000006f0| 3a e0 0d 00 1e 1f 76 65 | 72 73 69 6f 6e 24 3d 22 |:.....ve|rsion$="|
|00000700| 31 2e 35 32 20 28 32 39 | 2d 4d 61 79 2d 39 32 29 |1.52 (29|-May-92)|
|00000710| 22 0d 00 28 0d de 20 71 | 25 20 31 35 30 30 0d 00 |"..(.. q|% 1500..|
|00000720| 32 0e 24 71 25 3d 22 54 | 41 53 4b 22 0d 00 3c 31 |2.$q%="T|ASK"..<1|
|00000730| c8 99 20 22 57 69 6d 70 | 5f 49 6e 69 74 69 61 6c |.. "Wimp|_Initial|
|00000740| 69 73 65 22 2c 32 30 30 | 2c 21 71 25 2c 22 53 57 |ise",200|,!q%,"SW|
|00000750| 61 76 65 22 20 b8 20 2c | 74 61 73 6b 25 0d 00 46 |ave" . ,|task%..F|
|00000760| 15 c8 99 20 22 48 6f 75 | 72 67 6c 61 73 73 5f 4f |... "Hou|rglass_O|
|00000770| 6e 22 0d 00 50 30 41 70 | 70 44 69 72 24 3d a4 6f |n"..P0Ap|pDir$=.o|
|00000780| 73 5f 56 61 72 47 65 74 | 56 61 6c 28 71 25 2c 32 |s_VarGet|Val(q%,2|
|00000790| 30 30 30 2c 22 53 57 61 | 76 65 24 44 69 72 22 2c |000,"SWa|ve$Dir",|
|000007a0| 31 29 0d 00 5a 2f 53 25 | 3d 8e 20 22 3c 53 57 61 |1)..Z/S%|=. "<SWa|
|000007b0| 76 65 24 44 69 72 3e 2e | 53 70 72 69 74 65 73 22 |ve$Dir>.|Sprites"|
|000007c0| 3a 54 25 3d a2 23 53 25 | 2b 31 36 3a d9 23 20 53 |:T%=.#S%|+16:.# S|
|000007d0| 25 0d 00 64 38 de 20 73 | 70 20 54 25 3a 21 73 70 |%..d8. s|p T%:!sp|
|000007e0| 3d 54 25 3a 73 70 21 34 | 3d 30 3a 73 70 21 38 3d |=T%:sp!4|=0:sp!8=|
|000007f0| 31 36 3a 73 70 21 31 32 | 3d 31 36 3a de 20 41 28 |16:sp!12|=16:. A(|
|00000800| 35 30 29 2c 42 28 35 30 | 29 0d 00 6e 2a de 20 73 |50),B(50|)..n*. s|
|00000810| 70 31 20 35 30 30 30 30 | 3a 73 70 31 21 34 3d 30 |p1 50000|:sp1!4=0|
|00000820| 3a 73 70 31 21 38 3d 31 | 36 3a 73 70 31 21 31 32 |:sp1!8=1|6:sp1!12|
|00000830| 3d 31 36 0d 00 78 38 c8 | 99 20 22 4f 53 5f 53 70 |=16..x8.|. "OS_Sp|
|00000840| 72 69 74 65 4f 70 22 2c | 26 32 30 39 2c 73 70 20 |riteOp",|&209,sp |
|00000850| 20 3a c8 99 20 22 4f 53 | 5f 53 70 72 69 74 65 4f | :.. "OS|_SpriteO|
|00000860| 70 22 2c 26 32 30 39 2c | 73 70 31 0d 00 82 42 c8 |p",&209,|sp1...B.|
|00000870| 99 20 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |. "OS_Sp|riteOp",|
|00000880| 26 32 30 41 2c 73 70 2c | 22 3c 53 57 61 76 65 24 |&20A,sp,|"<SWave$|
|00000890| 44 69 72 3e 2e 53 70 72 | 69 74 65 73 22 20 3a f4 |Dir>.Spr|ites" :.|
|000008a0| 20 6c 6f 61 64 20 73 70 | 72 69 74 65 73 0d 00 8c | load sp|rites...|
|000008b0| 33 c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 |3.. "OS_|SpriteOp|
|000008c0| 22 2c 26 32 30 46 2c 73 | 70 31 2c 22 73 63 72 65 |",&20F,s|p1,"scre|
|000008d0| 65 6e 22 2c 30 2c 36 30 | 30 2c 31 36 30 2c 31 32 |en",0,60|0,160,12|
|000008e0| 0d 00 96 3b de 20 73 6e | 61 6d 65 31 25 20 32 30 |...;. sn|ame1% 20|
|000008f0| 2c 73 6e 61 6d 65 32 25 | 20 32 30 3a 24 73 6e 61 |,sname2%| 20:$sna|
|00000900| 6d 65 31 25 3d 22 73 63 | 72 65 65 6e 22 3a 24 73 |me1%="sc|reen":$s|
|00000910| 6e 61 6d 65 32 25 3d 22 | 31 22 3a 0d 00 a0 44 c8 |name2%="|1":...D.|
|00000920| 99 20 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |. "OS_Sp|riteOp",|
|00000930| 26 31 31 38 2c 73 70 31 | 2c 73 6e 61 6d 65 31 25 |&118,sp1|,sname1%|
|00000940| 20 b8 20 2c 2c 73 70 5f | 70 74 72 31 25 3a f4 20 | . ,,sp_|ptr1%:. |
|00000950| 70 74 72 20 74 6f 20 27 | 73 63 72 65 65 6e 27 0d |ptr to '|screen'.|
|00000960| 00 aa 43 c8 99 20 22 4f | 53 5f 53 70 72 69 74 65 |..C.. "O|S_Sprite|
|00000970| 4f 70 22 2c 26 31 31 38 | 2c 73 70 2c 73 6e 61 6d |Op",&118|,sp,snam|
|00000980| 65 32 25 20 b8 20 2c 2c | 73 70 5f 70 74 72 32 25 |e2% . ,,|sp_ptr2%|
|00000990| 3a f4 20 70 74 72 20 74 | 6f 20 27 73 63 72 65 65 |:. ptr t|o 'scree|
|000009a0| 6e 27 0d 00 b4 37 73 69 | 63 6f 6e 3d a4 69 63 6f |n'...7si|con=.ico|
|000009b0| 6e 5f 63 72 65 61 74 65 | 28 2d 31 2c 30 2c 30 2c |n_create|(-1,0,0,|
|000009c0| 36 38 2c 36 38 2c 30 2c | 30 2c 26 33 30 30 32 2c |68,68,0,|0,&3002,|
|000009d0| 22 21 53 57 61 76 65 22 | 29 0d 00 be 12 63 6c 61 |"!SWave"|)....cla|
|000009e0| 69 6d 71 75 65 72 79 24 | 3d 22 22 0d 00 c8 3b 63 |imquery$|=""...;c|
|000009f0| 6c 61 69 6d 6d 65 6e 75 | 24 20 3d 22 22 20 20 20 |laimmenu|$ ="" |
|00000a00| 20 20 20 20 20 20 3a f4 | 20 53 65 74 20 62 79 20 | :.| Set by |
|00000a10| 74 68 65 20 6d 65 6e 75 | 5f 78 78 78 78 20 72 6f |the menu|_xxxx ro|
|00000a20| 75 74 69 6e 65 73 0d 00 | d2 3f 63 6c 61 69 6d 64 |utines..|.?claimd|
|00000a30| 72 61 67 24 20 3d 22 22 | 20 20 20 20 20 20 20 20 |rag$ =""| |
|00000a40| 20 3a f4 20 53 65 74 20 | 62 79 20 74 68 65 20 75 | :. Set |by the u|
|00000a50| 73 65 72 64 72 61 67 5f | 78 78 78 78 20 72 6f 75 |serdrag_|xxxx rou|
|00000a60| 74 69 6e 65 73 0d 00 dc | 16 63 6c 6f 73 65 64 6f |tines...|.closedo|
|00000a70| 77 6e 20 20 20 20 20 20 | 20 3d a3 0d 00 e6 16 6f |wn | =.....o|
|00000a80| 70 65 6e 25 20 20 20 20 | 20 20 20 20 20 20 20 3d |pen% | =|
|00000a90| a3 0d 00 f0 16 63 68 61 | 6e 67 65 64 25 20 20 20 |.....cha|nged% |
|00000aa0| 20 20 20 20 20 3d b9 0d | 00 fa 16 77 68 6f 6c 65 | =..|...whole|
|00000ab0| 25 20 20 20 20 20 20 20 | 20 20 20 3d b9 0d 01 04 |% | =....|
|00000ac0| 11 64 72 61 77 6e 25 3d | a3 3a 66 25 3d 32 0d 01 |.drawn%=|.:f%=2..|
|00000ad0| 0e 1d 71 3d 30 3a 47 3d | 32 2f 33 3a 44 25 3d 30 |..q=0:G=|2/3:D%=0|
|00000ae0| 3a f2 53 57 61 76 65 6d | 61 6b 65 0d 01 18 42 de |:.SWavem|ake...B.|
|00000af0| 20 74 65 78 74 24 28 35 | 30 29 2c 73 65 74 74 69 | text$(5|0),setti|
|00000b00| 6e 67 28 35 30 29 2c 66 | 6c 61 67 73 28 35 30 29 |ng(50),f|lags(50)|
|00000b10| 20 3a f4 20 75 73 65 64 | 20 62 79 20 74 68 65 20 | :. used| by the |
|00000b20| 6d 65 6e 75 20 72 6f 75 | 74 69 6e 65 73 0d 01 22 |menu rou|tines.."|
|00000b30| 42 de 20 73 75 62 6d 65 | 6e 75 28 35 30 29 2c 72 |B. subme|nu(50),r|
|00000b40| 65 66 28 35 30 29 2c 6d | 65 6e 75 70 6f 73 28 32 |ef(50),m|enupos(2|
|00000b50| 30 29 20 3a f4 20 75 73 | 65 64 20 62 79 20 74 68 |0) :. us|ed by th|
|00000b60| 65 20 6d 65 6e 75 20 72 | 6f 75 74 69 6e 65 73 0d |e menu r|outines.|
|00000b70| 01 2c 0f de 20 6d 65 6e | 75 25 20 35 31 32 0d 01 |.,.. men|u% 512..|
|00000b80| 36 15 de 20 69 6e 64 69 | 72 65 63 74 25 20 26 32 |6.. indi|rect% &2|
|00000b90| 30 30 30 0d 01 40 12 de | 20 6d 73 67 62 6c 6b 25 |000..@..| msgblk%|
|00000ba0| 20 32 35 36 3a 0d 01 4a | 29 3a f4 20 55 73 65 64 | 256:..J|):. Used|
|00000bb0| 20 66 6f 72 20 69 6e 74 | 65 72 20 74 61 73 6b 20 | for int|er task |
|00000bc0| 63 6f 6d 6d 75 6e 69 63 | 61 74 69 6f 6e 73 0d 01 |communic|ations..|
|00000bd0| 54 25 69 70 74 72 25 3d | 69 6e 64 69 72 65 63 74 |T%iptr%=|indirect|
|00000be0| 25 3a 69 65 6e 64 25 3d | 69 70 74 72 25 2b 26 32 |%:iend%=|iptr%+&2|
|00000bf0| 30 30 30 0d 01 5e 1a de | 20 66 64 61 74 65 25 20 |000..^..| fdate% |
|00000c00| 35 2c 66 62 75 66 66 65 | 72 25 20 32 38 0d 01 68 |5,fbuffe|r% 28..h|
|00000c10| 2e f2 6f 70 65 6e 74 65 | 6d 70 6c 61 74 65 66 69 |..opente|mplatefi|
|00000c20| 6c 65 28 22 3c 53 57 61 | 76 65 24 44 69 72 3e 2e |le("<SWa|ve$Dir>.|
|00000c30| 54 65 6d 70 6c 61 74 65 | 73 22 29 0d 01 72 1d f2 |Template|s")..r..|
|00000c40| 6c 6f 61 64 74 65 6d 70 | 6c 61 74 65 28 22 70 72 |loadtemp|late("pr|
|00000c50| 6f 67 49 6e 66 6f 22 29 | 0d 01 7c 26 c8 99 20 22 |ogInfo")|..|&.. "|
|00000c60| 57 69 6d 70 5f 43 72 65 | 61 74 65 57 69 6e 64 6f |Wimp_Cre|ateWindo|
|00000c70| 77 22 2c 2c 71 25 20 b8 | 20 69 6e 66 6f 25 0d 01 |w",,q% .| info%..|
|00000c80| 86 1a f2 6c 6f 61 64 74 | 65 6d 70 6c 61 74 65 28 |...loadt|emplate(|
|00000c90| 22 6d 61 69 6e 77 22 29 | 0d 01 90 16 71 25 21 36 |"mainw")|....q%!6|
|00000ca0| 34 3d 73 70 3a 71 25 21 | 36 34 3d 73 70 31 0d 01 |4=sp:q%!|64=sp1..|
|00000cb0| 9a 27 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |.'.. "Wi|mp_Creat|
|00000cc0| 65 57 69 6e 64 6f 77 22 | 2c 2c 71 25 20 b8 20 6d |eWindow"|,,q% . m|
|00000cd0| 61 69 6e 77 25 0d 01 a4 | 16 f2 63 6c 6f 73 65 74 |ainw%...|..closet|
|00000ce0| 65 6d 70 6c 61 74 65 66 | 69 6c 65 0d 01 ae 28 f2 |emplatef|ile...(.|
|00000cf0| 69 63 6f 6e 5f 70 75 74 | 64 61 74 61 28 71 25 2c |icon_put|data(q%,|
|00000d00| 69 6e 66 6f 25 2c 34 2c | 76 65 72 73 69 6f 6e 24 |info%,4,|version$|
|00000d10| 2c 30 29 0d 01 b8 16 65 | 72 72 6f 72 5f 66 6c 61 |,0)....e|rror_fla|
|00000d20| 67 25 20 20 20 20 20 3d | 33 0d 01 c2 0c f2 6e 65 |g% =|3.....ne|
|00000d30| 77 76 61 6c 73 0d 01 cc | 0e ee 20 85 20 f2 65 72 |wvals...|.. . .er|
|00000d40| 72 6f 72 0d 01 d6 16 c8 | 99 20 22 48 6f 75 72 67 |ror.....|. "Hourg|
|00000d50| 6c 61 73 73 5f 4f 66 66 | 22 0d 01 e0 05 f5 0d 01 |lass_Off|".......|
|00000d60| ea 17 20 20 f2 61 63 74 | 69 6f 6e 28 a4 70 6f 6c |.. .act|ion(.pol|
|00000d70| 6c 28 30 29 29 0d 01 f4 | 0f fd 20 63 6c 6f 73 65 |l(0))...|.. close|
|00000d80| 64 6f 77 6e 0d 01 fe 0e | 24 71 25 3d 22 54 41 53 |down....|$q%="TAS|
|00000d90| 4b 22 0d 02 08 22 c8 99 | 20 22 57 69 6d 70 5f 43 |K"..."..| "Wimp_C|
|00000da0| 6c 6f 73 65 44 6f 77 6e | 22 2c 74 61 73 6b 25 2c |loseDown|",task%,|
|00000db0| 71 25 21 30 0d 02 12 05 | e0 0d 02 1c 0b dd f2 65 |q%!0....|.......e|
|00000dc0| 72 72 6f 72 0d 02 26 15 | e7 20 65 72 72 6f 72 5f |rror..&.|. error_|
|00000dd0| 66 6c 61 67 25 3d 33 20 | 8c 0d 02 30 4b 20 20 f2 |flag%=3 |...0K .|
|00000de0| 65 72 72 6f 72 62 6f 78 | 28 22 55 6e 65 78 70 65 |errorbox|("Unexpe|
|00000df0| 63 74 65 64 20 65 72 72 | 6f 72 3a 2d 20 22 2b f6 |cted err|or:- "+.|
|00000e00| 24 2b 22 20 49 6e 74 65 | 72 6e 61 6c 20 65 72 72 |$+" Inte|rnal err|
|00000e10| 6f 72 20 63 6f 64 65 20 | 22 2b c3 9e 29 3a f1 46 |or code |"+..):.F|
|00000e20| 49 4c 45 24 0d 02 3a 05 | cc 0d 02 44 13 20 20 f2 |ILE$..:.|...D. .|
|00000e30| 65 72 72 6f 72 62 6f 78 | 28 f6 24 29 0d 02 4e 04 |errorbox|(.$)..N.|
|00000e40| 0d 02 58 05 cd 0d 02 62 | 11 65 72 72 6f 72 5f 66 |..X....b|.error_f|
|00000e50| 6c 61 67 25 3d 33 0d 02 | 6c 18 c8 99 20 22 48 6f |lag%=3..|l... "Ho|
|00000e60| 75 72 67 6c 61 73 73 5f | 53 6d 61 73 68 22 0d 02 |urglass_|Smash"..|
|00000e70| 76 05 e1 0d 02 80 04 0d | 02 8a 0c dd f2 6f 6b 28 |v.......|.....ok(|
|00000e80| 65 24 29 0d 02 94 11 65 | 72 72 6f 72 5f 66 6c 61 |e$)....e|rror_fla|
|00000e90| 67 25 3d 31 0d 02 9e 0a | 85 20 31 2c 65 24 0d 02 |g%=1....|. 1,e$..|
|00000ea0| a8 05 e1 0d 02 b2 04 0d | 02 bc 12 dd f2 65 72 72 |........|.....err|
|00000eb0| 6f 72 62 6f 78 28 72 24 | 29 0d 02 c6 08 ea 20 72 |orbox(r$|)..... r|
|00000ec0| 25 0d 02 d0 19 21 71 25 | 3d 9f 3a 24 28 71 25 2b |%....!q%|=.:$(q%+|
|00000ed0| 34 29 3d 72 24 2b bd 28 | 30 29 0d 02 da 35 c8 99 |4)=r$+.(|0)...5..|
|00000ee0| 20 22 57 69 6d 70 5f 52 | 65 70 6f 72 74 45 72 72 | "Wimp_R|eportErr|
|00000ef0| 6f 72 22 2c 71 25 2c 65 | 72 72 6f 72 5f 66 6c 61 |or",q%,e|rror_fla|
|00000f00| 67 25 2c 22 53 57 61 76 | 65 22 20 b8 20 72 25 0d |g%,"SWav|e" . r%.|
|00000f10| 02 e4 18 e7 20 72 25 3d | 32 20 8c 20 63 6c 6f 73 |.... r%=|2 . clos|
|00000f20| 65 64 6f 77 6e 3d b9 0d | 02 ee 05 e1 0d 02 f8 3c |edown=..|.......<|
|00000f30| dd f2 63 6c 69 63 6b 77 | 69 6e 64 6f 77 28 6d 6f |..clickw|indow(mo|
|00000f40| 75 73 65 78 25 2c 6d 6f | 75 73 65 79 25 2c 62 75 |usex%,mo|usey%,bu|
|00000f50| 74 74 6f 6e 25 2c 68 61 | 6e 64 6c 65 25 2c 69 63 |tton%,ha|ndle%,ic|
|00000f60| 6f 6e 25 2c 6f 62 25 29 | 0d 03 02 10 c8 8e 20 68 |on%,ob%)|...... h|
|00000f70| 61 6e 64 6c 65 25 20 ca | 0d 03 0c 2c 20 20 c9 20 |andle% .|..., . |
|00000f80| 6d 61 69 6e 77 25 20 20 | 20 3a f2 63 6c 69 63 6b |mainw% | :.click|
|00000f90| 6d 61 69 6e 77 28 62 75 | 74 74 6f 6e 25 2c 69 63 |mainw(bu|tton%,ic|
|00000fa0| 6f 6e 25 29 0d 03 16 2e | 20 20 c9 20 2d 32 20 20 |on%)....| . -2 |
|00000fb0| 20 20 20 20 20 3a f2 63 | 6c 69 63 6b 69 63 6f 6e | :.c|lickicon|
|00000fc0| 62 61 72 28 62 75 74 74 | 6f 6e 25 2c 69 63 6f 6e |bar(butt|on%,icon|
|00000fd0| 25 29 0d 03 20 05 cb 0d | 03 2a 04 0d 03 34 05 e1 |%).. ...|.*...4..|
|00000fe0| 0d 03 3e 21 dd f2 63 6c | 69 63 6b 69 63 6f 6e 62 |..>!..cl|ickiconb|
|00000ff0| 61 72 28 62 75 74 74 6f | 6e 25 2c 69 63 6f 6e 25 |ar(butto|n%,icon%|
|00001000| 29 0d 03 48 11 e7 20 69 | 63 6f 6e 25 3c 30 20 8c |)..H.. i|con%<0 .|
|00001010| 20 e1 0d 03 52 0a c8 8e | 20 b9 20 ca 0d 03 5c 11 | ...R...| . ...\.|
|00001020| 20 20 c9 20 62 75 74 74 | 6f 6e 25 3d 32 0d 03 66 | . butt|on%=2..f|
|00001030| 20 20 20 20 20 f4 20 6f | 70 65 6e 73 20 74 68 65 | . o|pens the|
|00001040| 20 69 63 6f 6e 62 61 72 | 20 6d 65 6e 75 0d 03 70 | iconbar| menu..p|
|00001050| 17 20 20 20 20 e7 20 69 | 63 6f 6e 25 3d 73 69 63 |. . i|con%=sic|
|00001060| 6f 6e 20 8c 0d 03 7a 15 | 20 20 20 20 20 20 f2 6d |on ...z.| .m|
|00001070| 65 6e 75 5f 73 69 63 6f | 6e 0d 03 84 09 20 20 20 |enu_sico|n.... |
|00001080| 20 cd 0d 03 8e 11 20 20 | c9 20 62 75 74 74 6f 6e | ..... |. button|
|00001090| 25 3d 34 0d 03 98 32 20 | 20 20 6f 70 65 6e 25 3d |%=4...2 | open%=|
|000010a0| b9 3a 63 68 61 6e 67 65 | 64 25 3d b9 3a f2 6f 70 |.:change|d%=.:.op|
|000010b0| 65 6e 77 69 6e 64 6f 77 | 28 6d 61 69 6e 77 25 2c |enwindow|(mainw%,|
|000010c0| a3 2c 2d 31 29 0d 03 a2 | 05 cb 0d 03 ac 05 e1 0d |.,-1)...|........|
|000010d0| 03 b6 1f dd f2 63 6c 69 | 63 6b 6d 61 69 6e 77 28 |.....cli|ckmainw(|
|000010e0| 62 75 74 74 6f 6e 25 2c | 69 63 6f 6e 25 29 0d 03 |button%,|icon%)..|
|000010f0| c0 0a c8 8e 20 b9 20 ca | 0d 03 ca 15 c9 20 28 62 |.... . .|..... (b|
|00001100| 75 74 74 6f 6e 25 20 80 | 20 34 29 3d 34 0d 03 d4 |utton% .| 4)=4...|
|00001110| 0a c8 8e 20 b9 20 ca 0d | 03 de 1f c9 20 69 63 6f |... . ..|.... ico|
|00001120| 6e 25 3d 31 20 3a 66 25 | 2d 3d 31 3a e7 66 25 3d |n%=1 :f%|-=1:.f%=|
|00001130| 30 20 66 25 3d 31 0d 03 | e8 18 47 3d 32 2f 66 25 |0 f%=1..|..G=2/f%|
|00001140| 3a ef 37 3a f2 53 57 61 | 76 65 6d 61 6b 65 0d 03 |:.7:.SWa|vemake..|
|00001150| f2 29 c9 20 69 63 6f 6e | 25 3d 32 20 3a 66 25 2b |.). icon|%=2 :f%+|
|00001160| 3d 31 3a 47 3d 32 2f 66 | 25 3a ef 37 3a f2 53 57 |=1:G=2/f|%:.7:.SW|
|00001170| 61 76 65 6d 61 6b 65 0d | 03 fc 05 cb 0d 04 06 05 |avemake.|........|
|00001180| cb 0d 04 10 0a c8 8e 20 | b9 20 ca 0d 04 1a 10 20 |....... |. ..... |
|00001190| c9 20 62 75 74 74 6f 6e | 25 3d 32 0d 04 24 10 20 |. button|%=2..$. |
|000011a0| f2 6d 65 6e 75 5f 6d 61 | 69 6e 77 0d 04 2e 06 20 |.menu_ma|inw.... |
|000011b0| cb 0d 04 38 06 20 e1 0d | 04 42 18 dd f2 64 6f 5f |...8. ..|.B...do_|
|000011c0| 62 61 63 6b 67 72 6f 75 | 6e 64 5f 74 61 73 6b 0d |backgrou|nd_task.|
|000011d0| 04 4c 19 f2 72 65 64 72 | 61 77 77 69 6e 64 6f 77 |.L..redr|awwindow|
|000011e0| 28 6d 61 69 6e 77 25 29 | 0d 04 56 05 e1 0d 04 60 |(mainw%)|..V....`|
|000011f0| 1b dd f2 72 65 64 72 61 | 77 77 69 6e 64 6f 77 28 |...redra|wwindow(|
|00001200| 68 61 6e 64 6c 65 25 29 | 0d 04 6a 0b ea 20 76 6f |handle%)|..j.. vo|
|00001210| 69 64 25 0d 04 74 38 71 | 25 21 30 3d 68 61 6e 64 |id%..t8q|%!0=hand|
|00001220| 6c 65 25 3a 71 25 21 34 | 3d 31 30 3a 71 25 21 38 |le%:q%!4|=10:q%!8|
|00001230| 3d 2d 34 35 30 3a 71 25 | 21 31 32 3d 31 31 39 30 |=-450:q%|!12=1190|
|00001240| 3a 71 25 21 31 36 3d 2d | 31 30 30 0d 04 7e 27 c8 |:q%!16=-|100..~'.|
|00001250| 99 20 22 57 69 6d 70 5f | 55 70 64 61 74 65 57 69 |. "Wimp_|UpdateWi|
|00001260| 6e 64 6f 77 22 2c 30 2c | 71 25 20 b8 20 6d 6f 72 |ndow",0,|q% . mor|
|00001270| 65 25 0d 04 88 20 f4 50 | 52 4f 43 6c 77 61 6f 72 |e%... .P|ROClwaor|
|00001280| 69 67 69 6e 28 71 25 2b | 34 2c 78 30 25 2c 79 30 |igin(q%+|4,x0%,y0|
|00001290| 25 29 0d 04 92 0c c8 95 | 20 6d 6f 72 65 25 0d 04 |%)......| more%..|
|000012a0| 9c 0b 20 20 f2 64 72 61 | 77 0d 04 a6 11 f4 20 50 |.. .dra|w..... P|
|000012b0| 52 4f 43 6e 65 77 76 61 | 6c 73 0d 04 b0 29 20 20 |ROCnewva|ls...) |
|000012c0| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 52 65 63 74 |.. "Wimp|_GetRect|
|000012d0| 61 6e 67 6c 65 22 2c 30 | 2c 71 25 20 b8 20 6d 6f |angle",0|,q% . mo|
|000012e0| 72 65 25 0d 04 ba 05 ce | 0d 04 c4 05 e1 0d 04 ce |re%.....|........|
|000012f0| 19 dd a4 6f 6b 74 6f 63 | 6c 6f 73 65 77 28 68 61 |...oktoc|losew(ha|
|00001300| 6e 64 6c 65 25 29 0d 04 | d8 0f ea 20 73 68 75 74 |ndle%)..|... shut|
|00001310| 74 69 6e 67 25 0d 04 e2 | 0f 73 68 75 74 74 69 6e |ting%...|.shuttin|
|00001320| 67 25 3d b9 0d 04 ec 0e | 3d 73 68 75 74 74 69 6e |g%=.....|=shuttin|
|00001330| 67 25 0d 04 f6 0e dd f2 | 6b 65 79 70 72 65 73 73 |g%......|keypress|
|00001340| 0d 05 00 09 ea 20 69 63 | 25 0d 05 0a 10 e7 20 71 |..... ic|%..... q|
|00001350| 25 21 34 3c 3e 2d 31 20 | 8c 0d 05 14 29 20 20 c8 |%!4<>-1 |....) .|
|00001360| 99 20 22 57 69 6d 70 5f | 47 65 74 43 61 72 65 74 |. "Wimp_|GetCaret|
|00001370| 50 6f 73 69 74 69 6f 6e | 22 2c 2c 6d 73 67 62 6c |Position|",,msgbl|
|00001380| 6b 25 0d 05 1e 13 20 20 | 69 63 25 3d 6d 73 67 62 |k%.... |ic%=msgb|
|00001390| 6c 6b 25 21 34 0d 05 28 | 10 20 20 c8 8e 20 71 25 |lk%!4..(|. .. q%|
|000013a0| 21 32 34 20 ca 0d 05 32 | 27 20 20 20 20 c9 20 32 |!24 ...2|' . 2|
|000013b0| 37 20 8c 20 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |7 . .. "|Wimp_Cre|
|000013c0| 61 74 65 4d 65 6e 75 22 | 2c 2c 2d 31 0d 05 3c 07 |ateMenu"|,,-1..<.|
|000013d0| 20 20 7f 0d 05 46 10 20 | 20 20 c8 8e 20 71 25 21 | ...F. | .. q%!|
|000013e0| 30 20 ca 0d 05 50 2d 20 | 20 20 20 c9 20 6d 61 69 |0 ...P- | . mai|
|000013f0| 6e 77 25 20 20 3a f2 6b | 65 79 70 72 65 73 73 5f |nw% :.k|eypress_|
|00001400| 6d 61 69 6e 77 28 69 63 | 25 2c 71 25 21 32 34 29 |mainw(ic|%,q%!24)|
|00001410| 0d 05 5a 09 20 20 20 20 | cb 0d 05 64 07 20 20 cb |..Z. |...d. .|
|00001420| 0d 05 6e 05 cd 0d 05 78 | 04 0d 05 82 05 e1 0d 05 |..n....x|........|
|00001430| 8c 16 dd a4 6d 65 6e 75 | 73 65 6c 65 63 74 5f 73 |....menu|select_s|
|00001440| 69 63 6f 6e 0d 05 96 14 | ea 20 6c 65 76 65 6c 30 |icon....|. level0|
|00001450| 2c 62 75 74 74 6f 6e 25 | 0d 05 a0 0f 6c 65 76 65 |,button%|....leve|
|00001460| 6c 30 3d 71 25 21 30 0d | 05 aa 20 c8 99 20 22 57 |l0=q%!0.|.. .. "W|
|00001470| 69 6d 70 5f 47 65 74 50 | 6f 69 6e 74 65 72 49 6e |imp_GetP|ointerIn|
|00001480| 66 6f 22 2c 2c 71 25 0d | 05 b4 10 62 75 74 74 6f |fo",,q%.|...butto|
|00001490| 6e 25 3d 71 25 21 38 0d | 05 be 0f c8 8e 20 6c 65 |n%=q%!8.|..... le|
|000014a0| 76 65 6c 30 20 ca 0d 05 | c8 09 20 20 c9 20 30 0d |vel0 ...|.. . 0.|
|000014b0| 05 d2 09 20 20 c9 20 31 | 0d 05 dc 13 20 20 63 6c |... . 1|.... cl|
|000014c0| 6f 73 65 64 6f 77 6e 20 | 3d 20 b9 0d 05 e6 05 cb |osedown |= ......|
|000014d0| 0d 05 f0 06 3d 30 0d 05 | fa 04 0d 06 04 16 dd a4 |....=0..|........|
|000014e0| 6d 65 6e 75 73 65 6c 65 | 63 74 5f 6d 61 69 6e 77 |menusele|ct_mainw|
|000014f0| 0d 06 0e 1b ea 20 6c 65 | 76 65 6c 30 2c 6c 65 76 |..... le|vel0,lev|
|00001500| 65 6c 31 2c 62 75 74 74 | 6f 6e 25 0d 06 18 0f 6c |el1,butt|on%....l|
|00001510| 65 76 65 6c 30 3d 71 25 | 21 30 0d 06 22 0f 6c 65 |evel0=q%|!0..".le|
|00001520| 76 65 6c 31 3d 71 25 21 | 34 0d 06 2c 20 c8 99 20 |vel1=q%!|4.., .. |
|00001530| 22 57 69 6d 70 5f 47 65 | 74 50 6f 69 6e 74 65 72 |"Wimp_Ge|tPointer|
|00001540| 49 6e 66 6f 22 2c 2c 71 | 25 0d 06 36 10 62 75 74 |Info",,q|%..6.but|
|00001550| 74 6f 6e 25 3d 71 25 21 | 38 0d 06 40 0f c8 8e 20 |ton%=q%!|8..@... |
|00001560| 6c 65 76 65 6c 30 20 ca | 0d 06 4a 09 20 20 c9 20 |level0 .|..J. . |
|00001570| 30 0d 06 54 09 20 20 c9 | 20 31 0d 06 5e 10 20 63 |0..T. .| 1..^. c|
|00001580| 6c 6f 73 65 64 6f 77 6e | 3d b9 0d 06 68 05 cb 0d |losedown|=...h...|
|00001590| 06 72 06 3d 30 0d 06 7c | 04 0d 06 86 10 dd f2 6d |.r.=0..||.......m|
|000015a0| 65 6e 75 5f 6d 61 69 6e | 77 0d 06 90 08 ea 20 6e |enu_main|w..... n|
|000015b0| 6f 0d 06 9a 11 6e 6f 3d | 30 3a c8 97 20 78 2c 79 |o....no=|0:.. x,y|
|000015c0| 2c 62 0d 06 a4 3d f2 64 | 65 66 69 6e 65 5f 6d 65 |,b...=.d|efine_me|
|000015d0| 6e 75 5f 74 65 78 74 28 | 22 49 6e 66 6f 22 2c 6e |nu_text(|"Info",n|
|000015e0| 6f 2c 30 2c 30 2c 30 2c | 30 2c 26 31 30 30 32 31 |o,0,0,0,|0,&10021|
|000015f0| 2c 69 6e 66 6f 25 2c 30 | 29 3a 6e 6f 2b 3d 31 0d |,info%,0|):no+=1.|
|00001600| 06 ae 3a f2 64 65 66 69 | 6e 65 5f 6d 65 6e 75 5f |..:.defi|ne_menu_|
|00001610| 74 65 78 74 28 22 51 75 | 69 74 22 2c 6e 6f 2c 30 |text("Qu|it",no,0|
|00001620| 2c 30 2c 30 2c 30 2c 26 | 31 30 30 32 31 2c 30 2c |,0,0,0,&|10021,0,|
|00001630| 2d 31 29 3a 6e 6f 2b 3d | 31 0d 06 b8 27 f2 63 72 |-1):no+=|1...'.cr|
|00001640| 65 61 74 65 5f 6d 65 6e | 75 28 22 53 57 61 76 65 |eate_men|u("SWave|
|00001650| 22 2c 6e 6f 2c 32 31 30 | 2c 78 2d 36 34 2c 79 29 |",no,210|,x-64,y)|
|00001660| 0d 06 c2 0e 6d 65 6e 75 | 5f 6e 72 25 3d 30 0d 06 |....menu|_nr%=0..|
|00001670| cc 16 63 6c 61 69 6d 6d | 65 6e 75 24 3d 22 6d 61 |..claimm|enu$="ma|
|00001680| 69 6e 77 22 0d 06 d6 05 | e1 0d 06 e0 10 dd f2 6d |inw"....|.......m|
|00001690| 65 6e 75 5f 73 69 63 6f | 6e 0d 06 ea 11 6e 6f 3d |enu_sico|n....no=|
|000016a0| 30 3a c8 97 20 78 2c 79 | 2c 62 0d 06 f4 3d f2 64 |0:.. x,y|,b...=.d|
|000016b0| 65 66 69 6e 65 5f 6d 65 | 6e 75 5f 74 65 78 74 28 |efine_me|nu_text(|
|000016c0| 22 49 6e 66 6f 22 2c 6e | 6f 2c 30 2c 30 2c 30 2c |"Info",n|o,0,0,0,|
|000016d0| 30 2c 26 31 30 30 32 31 | 2c 69 6e 66 6f 25 2c 30 |0,&10021|,info%,0|
|000016e0| 29 3a 6e 6f 2b 3d 31 0d | 06 fe 3a f2 64 65 66 69 |):no+=1.|..:.defi|
|000016f0| 6e 65 5f 6d 65 6e 75 5f | 74 65 78 74 28 22 51 75 |ne_menu_|text("Qu|
|00001700| 69 74 22 2c 6e 6f 2c 30 | 2c 30 2c 30 2c 30 2c 26 |it",no,0|,0,0,0,&|
|00001710| 31 30 30 32 31 2c 30 2c | 2d 31 29 3a 6e 6f 2b 3d |10021,0,|-1):no+=|
|00001720| 31 0d 07 08 30 f2 63 72 | 65 61 74 65 5f 6d 65 6e |1...0.cr|eate_men|
|00001730| 75 28 22 53 57 61 76 65 | 22 2c 6e 6f 2c 32 31 30 |u("SWave|",no,210|
|00001740| 2c 78 2d 36 34 2c 39 36 | 2b 28 6e 6f 2a 34 30 29 |,x-64,96|+(no*40)|
|00001750| 29 0d 07 12 0e 6d 65 6e | 75 5f 6e 72 25 3d 30 0d |)....men|u_nr%=0.|
|00001760| 07 1c 15 63 6c 61 69 6d | 6d 65 6e 75 24 3d 22 78 |...claim|menu$="x|
|00001770| 66 65 72 22 0d 07 26 05 | e1 0d 07 30 16 dd f2 77 |fer"..&.|...0...w|
|00001780| 68 69 63 68 6d 65 6e 75 | 28 6d 65 6e 75 24 29 0d |hichmenu|(menu$).|
|00001790| 07 3a 0b ea 20 76 6f 69 | 64 25 0d 07 44 0e c8 8e |.:.. voi|d%..D...|
|000017a0| 20 6d 65 6e 75 24 20 ca | 0d 07 4e 28 20 20 c9 20 | menu$ .|..N( . |
|000017b0| 22 6d 61 69 6e 77 22 20 | 3a 76 6f 69 64 25 3d a4 |"mainw" |:void%=.|
|000017c0| 6d 65 6e 75 73 65 6c 65 | 63 74 5f 6d 61 69 6e 77 |menusele|ct_mainw|
|000017d0| 0d 07 58 28 20 20 c9 20 | 22 78 66 65 72 22 20 20 |..X( . |"xfer" |
|000017e0| 3a 76 6f 69 64 25 3d a4 | 6d 65 6e 75 73 65 6c 65 |:void%=.|menusele|
|000017f0| 63 74 5f 73 69 63 6f 6e | 0d 07 62 05 cb 0d 07 6c |ct_sicon|..b....l|
|00001800| 05 e1 0d 07 76 12 dd f2 | 66 69 6c 65 5f 63 68 61 |....v...|file_cha|
|00001810| 6e 67 65 64 0d 07 80 05 | e1 0d 07 8a 26 dd f2 6f |nged....|....&..o|
|00001820| 70 65 6e 77 69 6e 64 6f | 77 28 68 61 6e 64 6c 65 |penwindo|w(handle|
|00001830| 25 2c 66 75 6c 6c 25 2c | 66 72 6f 6e 74 25 29 0d |%,full%,|front%).|
|00001840| 07 94 10 71 25 21 30 3d | 68 61 6e 64 6c 65 25 0d |...q%!0=|handle%.|
|00001850| 07 9e 2d e7 20 ac 20 66 | 75 6c 6c 25 20 8c 20 c8 |..-. . f|ull% . .|
|00001860| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|00001870| 77 53 74 61 74 65 22 2c | 30 2c 71 25 0d 07 a8 17 |wState",|0,q%....|
|00001880| e7 20 66 72 6f 6e 74 25 | 20 8c 20 71 25 21 32 38 |. front%| . q%!28|
|00001890| 3d 2d 31 0d 07 b2 1d c8 | 99 20 22 57 69 6d 70 5f |=-1.....|. "Wimp_|
|000018a0| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 30 2c 71 25 |OpenWind|ow",0,q%|
|000018b0| 0d 07 bc 05 e1 0d 07 c6 | 04 0d 07 d0 1a dd f2 63 |........|.......c|
|000018c0| 6c 6f 73 65 77 69 6e 64 | 6f 77 28 68 61 6e 64 6c |losewind|ow(handl|
|000018d0| 65 25 29 0d 07 da 1c e7 | 20 a4 6f 6b 74 6f 63 6c |e%).....| .oktocl|
|000018e0| 6f 73 65 77 28 68 61 6e | 64 6c 65 25 29 20 8c 0d |osew(han|dle%) ..|
|000018f0| 07 e4 12 20 20 71 25 21 | 30 3d 68 61 6e 64 6c 65 |... q%!|0=handle|
|00001900| 25 0d 07 ee 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |%... .|. "Wimp_|
|00001910| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 30 2c 71 |CloseWin|dow",0,q|
|00001920| 25 0d 07 f8 05 cd 0d 08 | 02 05 e1 0d 08 0c 04 0d |%.......|........|
|00001930| 08 16 11 dd a4 70 6f 6c | 6c 28 6d 61 73 6b 25 29 |.....pol|l(mask%)|
|00001940| 0d 08 20 20 c8 99 20 22 | 57 69 6d 70 5f 50 6f 6c |.. .. "|Wimp_Pol|
|00001950| 6c 22 2c 6d 61 73 6b 25 | 2c 71 25 20 b8 20 61 25 |l",mask%|,q% . a%|
|00001960| 0d 08 2a 07 3d 61 25 0d | 08 34 04 0d 08 3e 13 dd |..*.=a%.|.4...>..|
|00001970| f2 61 63 74 69 6f 6e 28 | 65 76 6e 74 25 29 0d 08 |.action(|evnt%)..|
|00001980| 48 04 0d 08 52 0e c8 8e | 20 65 76 6e 74 25 20 ca |H...R...| evnt% .|
|00001990| 0d 08 5c 1d 20 20 c9 20 | 30 3a f2 64 6f 5f 62 61 |..\. . |0:.do_ba|
|000019a0| 63 6b 67 72 6f 75 6e 64 | 5f 74 61 73 6b 0d 08 66 |ckground|_task..f|
|000019b0| 1d 20 20 c9 20 31 3a f2 | 72 65 64 72 61 77 77 69 |. . 1:.|redrawwi|
|000019c0| 6e 64 6f 77 28 71 25 21 | 30 29 0d 08 70 1f 20 20 |ndow(q%!|0)..p. |
|000019d0| c9 20 32 3a f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |. 2:.ope|nwindow(|
|000019e0| 71 25 21 30 2c b9 2c 30 | 29 0d 08 7a 1c 20 20 c9 |q%!0,.,0|)..z. .|
|000019f0| 20 33 3a f2 63 6c 6f 73 | 65 77 69 6e 64 6f 77 28 | 3:.clos|ewindow(|
|00001a00| 71 25 21 30 29 0d 08 84 | 0a 20 20 c9 20 34 3a 0d |q%!0)...|. . 4:.|
|00001a10| 08 8e 0a 20 20 c9 20 35 | 3a 0d 08 98 37 20 20 c9 |... . 5|:...7 .|
|00001a20| 20 36 3a f2 63 6c 69 63 | 6b 77 69 6e 64 6f 77 28 | 6:.clic|kwindow(|
|00001a30| 21 71 25 2c 71 25 21 34 | 2c 71 25 21 38 2c 71 25 |!q%,q%!4|,q%!8,q%|
|00001a40| 21 31 32 2c 71 25 21 31 | 36 2c 71 25 21 32 30 29 |!12,q%!1|6,q%!20)|
|00001a50| 0d 08 a2 14 20 20 c9 20 | 37 3a 63 68 61 6e 67 65 |.... . |7:change|
|00001a60| 64 25 3d b9 0d 08 ac 13 | 20 20 c9 20 38 3a f2 6b |d%=.....| . 8:.k|
|00001a70| 65 79 70 72 65 73 73 0d | 08 b6 33 20 20 c9 20 39 |eypress.|..3 . 9|
|00001a80| 3a e7 20 63 6c 61 69 6d | 6d 65 6e 75 24 3c 3e 22 |:. claim|menu$<>"|
|00001a90| 22 20 8c 20 f2 77 68 69 | 63 68 6d 65 6e 75 28 63 |" . .whi|chmenu(c|
|00001aa0| 6c 61 69 6d 6d 65 6e 75 | 24 29 0d 08 c0 0e 20 20 |laimmenu|$).... |
|00001ab0| c9 20 31 37 2c 31 38 3a | 0d 08 ca 05 cb 0d 08 d4 |. 17,18:|........|
|00001ac0| 05 e1 0d 08 de 04 0d 08 | e8 11 dd f2 72 65 63 65 |........|....rece|
|00001ad0| 69 76 65 28 71 25 29 0d | 08 f2 0e c8 8e 20 71 25 |ive(q%).|..... q%|
|00001ae0| 21 31 36 20 ca 0d 08 fc | 37 c9 20 30 20 20 20 20 |!16 ....|7. 0 |
|00001af0| 3a 24 71 25 3d 22 54 41 | 53 4b 22 3a c8 99 20 22 |:$q%="TA|SK":.. "|
|00001b00| 57 69 6d 70 5f 43 6c 6f | 73 65 44 6f 77 6e 22 2c |Wimp_Clo|seDown",|
|00001b10| 74 61 73 6b 25 2c 71 25 | 21 30 3a e0 0d 09 06 05 |task%,q%|!0:.....|
|00001b20| cb 0d 09 10 05 e1 0d 09 | 1a 04 0d 09 24 1c dd f2 |........|....$...|
|00001b30| 6c 77 61 6f 72 69 67 69 | 6e 28 62 2c f8 20 78 25 |lwaorigi|n(b,. x%|
|00001b40| 2c f8 20 79 25 29 0d 09 | 2e 1c 78 25 3d 62 21 30 |,. y%)..|..x%=b!0|
|00001b50| 2d 62 21 31 36 3a 79 25 | 3d 62 21 31 32 2d 62 21 |-b!16:y%|=b!12-b!|
|00001b60| 32 30 0d 09 38 05 e1 0d | 09 42 04 0d 09 4c 48 dd |20..8...|.B...LH.|
|00001b70| a4 69 63 6f 6e 5f 63 72 | 65 61 74 65 28 77 69 6e |.icon_cr|eate(win|
|00001b80| 64 6f 77 25 2c 6d 69 6e | 78 25 2c 6d 69 6e 79 25 |dow%,min|x%,miny%|
|00001b90| 2c 77 69 64 74 68 25 2c | 68 65 69 67 68 74 25 2c |,width%,|height%,|
|00001ba0| 66 67 25 2c 62 67 25 2c | 66 6c 67 25 2c 64 61 74 |fg%,bg%,|flg%,dat|
|00001bb0| 61 24 29 0d 09 56 08 ea | 20 69 25 0d 09 60 10 71 |a$)..V..| i%..`.q|
|00001bc0| 25 21 30 3d 77 69 6e 64 | 6f 77 25 0d 09 6a 19 71 |%!0=wind|ow%..j.q|
|00001bd0| 25 21 34 3d 6d 69 6e 78 | 25 3a 71 25 21 38 3d 6d |%!4=minx|%:q%!8=m|
|00001be0| 69 6e 79 25 0d 09 74 2a | 71 25 21 31 32 3d 6d 69 |iny%..t*|q%!12=mi|
|00001bf0| 6e 78 25 2b 77 69 64 74 | 68 25 3a 71 25 21 31 36 |nx%+widt|h%:q%!16|
|00001c00| 3d 6d 69 6e 79 25 2b 68 | 65 69 67 68 74 25 0d 09 |=miny%+h|eight%..|
|00001c10| 7e 22 71 25 21 32 30 3d | 66 6c 67 25 20 84 20 62 |~"q%!20=|flg% . b|
|00001c20| 67 25 3c 3c 32 38 20 84 | 20 66 67 25 3c 3c 32 34 |g%<<28 .| fg%<<24|
|00001c30| 0d 09 88 14 e7 20 71 25 | 21 32 30 20 80 20 26 31 |..... q%|!20 . &1|
|00001c40| 30 30 20 8c 0d 09 92 14 | 20 20 69 25 3d a7 64 61 |00 .....| i%=.da|
|00001c50| 74 61 24 2c 22 2c 22 29 | 0d 09 9c 1b 20 20 71 25 |ta$,",")|.... q%|
|00001c60| 21 32 34 3d a0 28 c0 64 | 61 74 61 24 2c 69 25 2d |!24=.(.d|ata$,i%-|
|00001c70| 31 29 29 0d 09 a6 0e 20 | 20 71 25 21 32 38 3d 2d |1)).... | q%!28=-|
|00001c80| 31 0d 09 b0 1b 20 20 71 | 25 21 33 32 3d a0 28 c1 |1.... q|%!32=.(.|
|00001c90| 64 61 74 61 24 2c 69 25 | 2b 31 29 29 0d 09 ba 05 |data$,i%|+1))....|
|00001ca0| cc 0d 09 c4 17 24 28 71 | 25 2b 32 34 29 3d c0 64 |.....$(q|%+24)=.d|
|00001cb0| 61 74 61 24 2c 31 31 29 | 0d 09 ce 05 cd 0d 09 d8 |ata$,11)|........|
|00001cc0| 22 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |".. "Wim|p_Create|
|00001cd0| 49 63 6f 6e 22 2c 30 2c | 71 25 20 b8 20 69 25 0d |Icon",0,|q% . i%.|
|00001ce0| 09 e2 07 3d 69 25 0d 09 | ec 04 0d 09 f6 23 dd f2 |...=i%..|.....#..|
|00001cf0| 69 63 6f 6e 5f 64 65 73 | 65 6c 65 63 74 28 68 61 |icon_des|elect(ha|
|00001d00| 6e 64 6c 65 25 2c 69 63 | 6f 6e 68 25 29 0d 0a 00 |ndle%,ic|onh%)...|
|00001d10| 12 e7 20 69 63 6f 6e 68 | 25 3c 3e 2d 31 20 8c 0d |.. iconh|%<>-1 ..|
|00001d20| 0a 0a 1e 20 20 71 25 21 | 30 3d 68 61 6e 64 6c 65 |... q%!|0=handle|
|00001d30| 25 3a 71 25 21 34 3d 69 | 63 6f 6e 68 25 0d 0a 14 |%:q%!4=i|conh%...|
|00001d40| 1b 20 20 71 25 21 38 3d | 26 32 30 30 30 30 30 3a |. q%!8=|&200000:|
|00001d50| 71 25 21 31 32 3d 26 30 | 0d 0a 1e 20 20 20 c8 99 |q%!12=&0|... ..|
|00001d60| 20 22 57 69 6d 70 5f 53 | 65 74 49 63 6f 6e 53 74 | "Wimp_S|etIconSt|
|00001d70| 61 74 65 22 2c 2c 71 25 | 0d 0a 28 05 cd 0d 0a 32 |ate",,q%|..(....2|
|00001d80| 05 e1 0d 0a 3c 04 0d 0a | 46 26 dd f2 69 63 6f 6e |....<...|F&..icon|
|00001d90| 5f 70 75 74 64 61 74 61 | 28 62 2c 77 68 25 2c 69 |_putdata|(b,wh%,i|
|00001da0| 68 25 2c 74 65 78 74 24 | 2c 72 64 29 0d 0a 50 13 |h%,text$|,rd)..P.|
|00001db0| 62 21 30 3d 77 68 25 3a | 62 21 34 3d 69 68 25 0d |b!0=wh%:|b!4=ih%.|
|00001dc0| 0a 5a 1d c8 99 20 22 57 | 69 6d 70 5f 47 65 74 49 |.Z... "W|imp_GetI|
|00001dd0| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 62 0d 0a 64 1b |conState|",,b..d.|
|00001de0| c8 99 20 22 57 69 6d 70 | 5f 44 65 6c 65 74 65 49 |.. "Wimp|_DeleteI|
|00001df0| 63 6f 6e 22 2c 2c 62 0d | 0a 6e 1e 62 21 34 3d 77 |con",,b.|.n.b!4=w|
|00001e00| 68 25 3a 24 28 62 21 32 | 38 29 3d 74 65 78 74 24 |h%:$(b!2|8)=text$|
|00001e10| 3a 62 2b 3d 34 0d 0a 78 | 1b c8 99 20 22 57 69 6d |:b+=4..x|... "Wim|
|00001e20| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 2c 2c 62 |p_Create|Icon",,b|
|00001e30| 0d 0a 82 36 e7 20 72 64 | 20 8c 20 c8 99 20 22 57 |...6. rd| . .. "W|
|00001e40| 69 6d 70 5f 46 6f 72 63 | 65 52 65 64 72 61 77 22 |imp_Forc|eRedraw"|
|00001e50| 2c 62 21 30 2c 62 21 34 | 2c 62 21 38 2c 62 21 31 |,b!0,b!4|,b!8,b!1|
|00001e60| 32 2c 62 21 31 36 0d 0a | 8c 08 62 2d 3d 34 0d 0a |2,b!16..|..b-=4..|
|00001e70| 96 05 e1 0d 0a a0 04 0d | 0a aa 35 dd f2 69 63 6f |........|..5..ico|
|00001e80| 6e 5f 70 75 74 64 61 74 | 61 28 71 25 2c 77 68 61 |n_putdat|a(q%,wha|
|00001e90| 6e 64 6c 65 25 2c 69 68 | 61 6e 64 6c 65 25 2c 64 |ndle%,ih|andle%,d|
|00001ea0| 61 74 61 24 2c 72 65 64 | 72 61 77 29 0d 0a b4 11 |ata$,red|raw)....|
|00001eb0| 71 25 21 30 3d 77 68 61 | 6e 64 6c 65 25 0d 0a be |q%!0=wha|ndle%...|
|00001ec0| 11 71 25 21 34 3d 69 68 | 61 6e 64 6c 65 25 0d 0a |.q%!4=ih|andle%..|
|00001ed0| c8 1e c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 |.... "Wi|mp_GetIc|
|00001ee0| 6f 6e 53 74 61 74 65 22 | 2c 2c 71 25 0d 0a d2 12 |onState"|,,q%....|
|00001ef0| 24 28 71 25 21 32 38 29 | 3d 64 61 74 61 24 0d 0a |$(q%!28)|=data$..|
|00001f00| dc 0e e7 20 72 65 64 72 | 61 77 20 8c 0d 0a e6 3b |... redr|aw ....;|
|00001f10| 20 20 c8 99 20 22 57 69 | 6d 70 5f 46 6f 72 63 65 | .. "Wi|mp_Force|
|00001f20| 52 65 64 72 61 77 22 2c | 77 68 61 6e 64 6c 65 25 |Redraw",|whandle%|
|00001f30| 2c 71 25 21 38 2c 71 25 | 21 31 32 2c 71 25 21 31 |,q%!8,q%|!12,q%!1|
|00001f40| 36 2c 71 25 21 32 30 0d | 0a f0 05 cd 0d 0a fa 05 |6,q%!20.|........|
|00001f50| e1 0d 0b 04 04 0d 0b 0e | 2d dd f2 69 63 6f 6e 5f |........|-..icon_|
|00001f60| 73 65 74 62 67 63 6f 6c | 6f 75 72 28 62 2c 77 68 |setbgcol|our(b,wh|
|00001f70| 61 6e 64 6c 65 25 2c 69 | 63 6f 6e 25 2c 63 6f 6c |andle%,i|con%,col|
|00001f80| 25 29 0d 0b 18 35 21 62 | 3d 77 68 61 6e 64 6c 65 |%)...5!b|=whandle|
|00001f90| 25 3a 62 21 34 3d 69 63 | 6f 6e 25 3a 62 21 38 3d |%:b!4=ic|on%:b!8=|
|00001fa0| 63 6f 6c 25 3c 3c 32 38 | 3a 62 21 31 32 3d 26 46 |col%<<28|:b!12=&F|
|00001fb0| 30 30 30 30 30 30 30 0d | 0b 22 1e c8 99 20 22 57 |0000000.|."... "W|
|00001fc0| 69 6d 70 5f 53 65 74 49 | 63 6f 6e 53 74 61 74 65 |imp_SetI|conState|
|00001fd0| 22 2c 30 2c 62 0d 0b 2c | 05 e1 0d 0b 36 04 0d 0b |",0,b..,|....6...|
|00001fe0| 40 2d dd f2 69 63 6f 6e | 5f 73 65 74 66 67 63 6f |@-..icon|_setfgco|
|00001ff0| 6c 6f 75 72 28 62 2c 77 | 68 61 6e 64 6c 65 25 2c |lour(b,w|handle%,|
|00002000| 69 63 6f 6e 25 2c 63 6f | 6c 25 29 0d 0b 4a 35 21 |icon%,co|l%)..J5!|
|00002010| 62 3d 77 68 61 6e 64 6c | 65 25 3a 62 21 34 3d 69 |b=whandl|e%:b!4=i|
|00002020| 63 6f 6e 25 3a 62 21 38 | 3d 63 6f 6c 25 3c 3c 32 |con%:b!8|=col%<<2|
|00002030| 34 3a 62 21 31 32 3d 26 | 30 46 30 30 30 30 30 30 |4:b!12=&|0F000000|
|00002040| 0d 0b 54 1e c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |..T... "|Wimp_Set|
|00002050| 49 63 6f 6e 53 74 61 74 | 65 22 2c 30 2c 62 0d 0b |IconStat|e",0,b..|
|00002060| 5e 05 e1 0d 0b 68 04 0d | 0b 72 39 dd a4 69 63 6f |^....h..|.r9..ico|
|00002070| 6e 5f 6e 65 77 73 70 72 | 69 74 65 28 62 2c 77 68 |n_newspr|ite(b,wh|
|00002080| 61 6e 64 6c 65 25 2c 69 | 68 61 6e 64 6c 65 25 2c |andle%,i|handle%,|
|00002090| 6e 65 77 6e 61 6d 65 24 | 2c 72 65 64 72 61 77 29 |newname$|,redraw)|
|000020a0| 0d 0b 7c 1d 62 21 30 3d | 77 68 61 6e 64 6c 65 25 |..|.b!0=|whandle%|
|000020b0| 3a 62 21 34 3d 69 68 61 | 6e 64 6c 65 25 0d 0b 86 |:b!4=iha|ndle%...|
|000020c0| 1d c8 99 20 22 57 69 6d | 70 5f 47 65 74 49 63 6f |... "Wim|p_GetIco|
|000020d0| 6e 53 74 61 74 65 22 2c | 2c 62 0d 0b 90 1b c8 99 |nState",|,b......|
|000020e0| 20 22 57 69 6d 70 5f 44 | 65 6c 65 74 65 49 63 6f | "Wimp_D|eleteIco|
|000020f0| 6e 22 2c 2c 62 0d 0b 9a | 43 62 21 34 3d 62 21 38 |n",,b...|Cb!4=b!8|
|00002100| 3a 62 21 38 3d 62 21 31 | 32 3a 62 21 31 32 3d 62 |:b!8=b!1|2:b!12=b|
|00002110| 21 31 36 3a 62 21 31 36 | 3d 62 21 32 30 3a 62 21 |!16:b!16|=b!20:b!|
|00002120| 32 30 3d 62 21 32 34 3a | 24 28 62 2b 32 34 29 3d |20=b!24:|$(b+24)=|
|00002130| 6e 65 77 6e 61 6d 65 24 | 0d 0b a4 26 c8 99 20 22 |newname$|...&.. "|
|00002140| 57 69 6d 70 5f 43 72 65 | 61 74 65 49 63 6f 6e 22 |Wimp_Cre|ateIcon"|
|00002150| 2c 2c 62 20 b8 20 69 68 | 61 6e 64 6c 65 25 0d 0b |,,b . ih|andle%..|
|00002160| ae 3a e7 20 72 65 64 72 | 61 77 20 8c 20 c8 99 20 |.:. redr|aw . .. |
|00002170| 22 57 69 6d 70 5f 46 6f | 72 63 65 52 65 64 72 61 |"Wimp_Fo|rceRedra|
|00002180| 77 22 2c 62 21 30 2c 62 | 21 34 2c 62 21 38 2c 62 |w",b!0,b|!4,b!8,b|
|00002190| 21 31 32 2c 62 21 31 36 | 0d 0b b8 0d 3d 69 68 61 |!12,b!16|....=iha|
|000021a0| 6e 64 6c 65 25 0d 0b c2 | 04 0d 0b cc 28 dd a4 69 |ndle%...|....(..i|
|000021b0| 63 6f 6e 5f 67 65 74 64 | 61 74 61 28 71 25 2c 77 |con_getd|ata(q%,w|
|000021c0| 68 61 6e 64 6c 65 25 2c | 69 68 61 6e 64 6c 65 25 |handle%,|ihandle%|
|000021d0| 29 0d 0b d6 11 71 25 21 | 30 3d 77 68 61 6e 64 6c |)....q%!|0=whandl|
|000021e0| 65 25 0d 0b e0 11 71 25 | 21 34 3d 69 68 61 6e 64 |e%....q%|!4=ihand|
|000021f0| 6c 65 25 0d 0b ea 1e c8 | 99 20 22 57 69 6d 70 5f |le%.....|. "Wimp_|
|00002200| 47 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 71 |GetIconS|tate",,q|
|00002210| 25 0d 0b f4 0d 3d 24 28 | 71 25 21 32 38 29 0d 0b |%....=$(|q%!28)..|
|00002220| fe 04 0d 0c 08 45 dd f2 | 63 61 72 65 74 5f 73 65 |.....E..|caret_se|
|00002230| 74 70 6f 73 69 74 69 6f | 6e 28 77 68 61 6e 64 6c |tpositio|n(whandl|
|00002240| 65 25 2c 69 68 61 6e 64 | 6c 65 25 2c 78 6f 66 66 |e%,ihand|le%,xoff|
|00002250| 25 2c 79 6f 66 66 25 2c | 68 65 69 67 68 74 25 2c |%,yoff%,|height%,|
|00002260| 69 6e 64 65 78 25 29 0d | 0c 12 4b c8 99 20 22 57 |index%).|..K.. "W|
|00002270| 69 6d 70 5f 53 65 74 43 | 61 72 65 74 50 6f 73 69 |imp_SetC|aretPosi|
|00002280| 74 69 6f 6e 22 2c 77 68 | 61 6e 64 6c 65 25 2c 69 |tion",wh|andle%,i|
|00002290| 68 61 6e 64 6c 65 25 2c | 78 6f 66 66 25 2c 79 6f |handle%,|xoff%,yo|
|000022a0| 66 66 25 2c 68 65 69 67 | 68 74 25 2c 69 6e 64 65 |ff%,heig|ht%,inde|
|000022b0| 78 25 0d 0c 1c 05 e1 0d | 0c 26 04 0d 0c 30 0d dd |x%......|.&...0..|
|000022c0| f2 6e 65 77 76 61 6c 73 | 0d 0c 3a 17 67 74 78 3d |.newvals|..:.gtx=|
|000022d0| 71 25 21 33 36 3a 67 74 | 79 3d 71 25 21 34 30 0d |q%!36:gt|y=q%!40.|
|000022e0| 0c 44 15 77 62 78 3d 71 | 25 21 34 3a 77 62 79 3d |.D.wbx=q|%!4:wby=|
|000022f0| 71 25 21 38 0d 0c 4e 17 | 77 74 78 3d 71 25 21 31 |q%!8..N.|wtx=q%!1|
|00002300| 32 3a 77 74 79 3d 71 25 | 21 31 36 0d 0c 58 17 78 |2:wty=q%|!16..X.x|
|00002310| 73 63 3d 71 25 21 32 30 | 3a 79 73 63 3d 71 25 21 |sc=q%!20|:ysc=q%!|
|00002320| 32 34 0d 0c 62 21 68 70 | 3d 77 74 78 2d 77 62 78 |24..b!hp|=wtx-wbx|
|00002330| 3a 76 70 3d 77 74 79 2d | 77 62 79 3a 65 62 78 3d |:vp=wty-|wby:ebx=|
|00002340| 78 73 63 0d 0c 6c 21 65 | 74 78 3d 78 73 63 2b 68 |xsc..l!e|tx=xsc+h|
|00002350| 70 3a 65 74 79 3d 79 73 | 63 3a 65 62 79 3d 79 73 |p:ety=ys|c:eby=ys|
|00002360| 63 2d 76 70 0d 0c 76 05 | e1 0d 0c 80 04 0d 0c 8a |c-vp..v.|........|
|00002370| 32 dd f2 64 65 66 69 6e | 65 5f 6d 65 6e 75 5f 74 |2..defin|e_menu_t|
|00002380| 65 78 74 28 74 65 78 74 | 24 2c 6e 2c 77 2c 74 2c |ext(text|$,n,w,t,|
|00002390| 64 2c 73 2c 66 6c 61 67 | 73 2c 73 6d 2c 6c 29 0d |d,s,flag|s,sm,l).|
|000023a0| 0c 94 12 74 65 78 74 24 | 28 6e 29 3d 74 65 78 74 |...text$|(n)=text|
|000023b0| 24 0d 0c 9e 10 73 65 74 | 74 69 6e 67 28 6e 29 3d |$....set|ting(n)=|
|000023c0| 30 0d 0c a8 38 e7 20 77 | 20 8c 20 73 65 74 74 69 |0...8. w| . setti|
|000023d0| 6e 67 28 6e 29 3d 73 65 | 74 74 69 6e 67 28 6e 29 |ng(n)=se|tting(n)|
|000023e0| 20 84 20 26 30 34 3a 66 | 6c 61 67 73 3d 66 6c 61 | . &04:f|lags=fla|
|000023f0| 67 73 20 84 20 26 31 30 | 30 0d 0c b2 25 e7 20 74 |gs . &10|0...%. t|
|00002400| 20 8c 20 73 65 74 74 69 | 6e 67 28 6e 29 3d 73 65 | . setti|ng(n)=se|
|00002410| 74 74 69 6e 67 28 6e 29 | 20 84 20 26 30 31 0d 0c |tting(n)| . &01..|
|00002420| bc 25 e7 20 64 20 8c 20 | 73 65 74 74 69 6e 67 28 |.%. d . |setting(|
|00002430| 6e 29 3d 73 65 74 74 69 | 6e 67 28 6e 29 20 84 20 |n)=setti|ng(n) . |
|00002440| 26 30 32 0d 0c c6 25 e7 | 20 6c 20 8c 20 73 65 74 |&02...%.| l . set|
|00002450| 74 69 6e 67 28 6e 29 3d | 73 65 74 74 69 6e 67 28 |ting(n)=|setting(|
|00002460| 6e 29 20 84 20 26 38 30 | 0d 0c d0 1f e7 20 73 20 |n) . &80|..... s |
|00002470| 8c 20 66 6c 61 67 73 3d | 66 6c 61 67 73 20 84 20 |. flags=|flags . |
|00002480| 26 34 30 30 30 30 30 0d | 0c da 12 66 6c 61 67 73 |&400000.|...flags|
|00002490| 28 6e 29 3d 66 6c 61 67 | 73 0d 0c e4 11 73 75 62 |(n)=flag|s....sub|
|000024a0| 6d 65 6e 75 28 6e 29 3d | 73 6d 0d 0c ee 05 e1 0d |menu(n)=|sm......|
|000024b0| 0c f8 04 0d 0d 02 26 dd | f2 63 72 65 61 74 65 5f |......&.|.create_|
|000024c0| 6d 65 6e 75 28 74 69 74 | 6c 65 24 2c 6e 2c 77 69 |menu(tit|le$,n,wi|
|000024d0| 64 74 68 25 2c 78 2c 79 | 29 0d 0d 0c 0d 6d 62 25 |dth%,x,y|)....mb%|
|000024e0| 3d 6d 65 6e 75 25 0d 0d | 16 0f 6d 65 6e 75 73 3d |=menu%..|..menus=|
|000024f0| 30 3a 71 3d 30 0d 0d 20 | 05 f5 0d 0d 2a 21 20 20 |0:q=0.. |....*! |
|00002500| 6d 65 6e 75 70 6f 73 28 | 6d 65 6e 75 73 29 3d 6d |menupos(|menus)=m|
|00002510| 62 25 3a 6d 65 6e 75 73 | 2b 3d 31 0d 0d 34 11 20 |b%:menus|+=1..4. |
|00002520| 20 24 6d 62 25 3d 74 69 | 74 6c 65 24 0d 0d 3e 0e | $mb%=ti|tle$..>.|
|00002530| 20 20 6d 62 25 3f 31 32 | 3d 37 0d 0d 48 0e 20 20 | mb%?12|=7..H. |
|00002540| 6d 62 25 3f 31 33 3d 32 | 0d 0d 52 0e 20 20 6d 62 |mb%?13=2|..R. mb|
|00002550| 25 3f 31 34 3d 37 0d 0d | 5c 0e 20 20 6d 62 25 3f |%?14=7..|\. mb%?|
|00002560| 31 35 3d 30 0d 0d 66 13 | 20 20 6d 62 25 21 31 36 |15=0..f.| mb%!16|
|00002570| 3d 77 69 64 74 68 25 0d | 0d 70 27 20 20 6d 62 25 |=width%.|.p' mb%|
|00002580| 21 32 30 3d 34 30 20 3a | f4 20 68 65 69 67 68 74 |!20=40 :|. height|
|00002590| 20 6f 66 20 6d 65 6e 75 | 20 69 74 65 6d 73 0d 0d | of menu| items..|
|000025a0| 7a 41 20 20 6d 62 25 21 | 32 34 3d 30 20 20 3a f4 |zA mb%!|24=0 :.|
|000025b0| 20 76 65 72 74 69 63 61 | 6c 20 67 61 70 20 62 65 | vertica|l gap be|
|000025c0| 74 77 65 65 6e 20 69 74 | 65 6d 73 20 28 61 6c 73 |tween it|ems (als|
|000025d0| 6f 20 74 6f 70 20 26 20 | 62 6f 74 74 6f 6d 29 0d |o top & |bottom).|
|000025e0| 0d 84 14 20 20 69 74 65 | 6d 70 74 72 3d 6d 62 25 |... ite|mptr=mb%|
|000025f0| 2b 32 38 0d 0d 8e 07 20 | 20 f5 0d 0d 98 1c 20 20 |+28.... | ..... |
|00002600| 20 20 69 74 65 6d 70 74 | 72 21 30 3d 73 65 74 74 | itempt|r!0=sett|
|00002610| 69 6e 67 28 71 29 0d 0d | a2 18 20 20 20 20 72 65 |ing(q)..|.. re|
|00002620| 66 28 71 29 3d 69 74 65 | 6d 70 74 72 2b 34 0d 0d |f(q)=ite|mptr+4..|
|00002630| ac 2a 20 20 20 20 69 74 | 65 6d 70 74 72 21 38 3d |.* it|emptr!8=|
|00002640| 66 6c 61 67 73 28 71 29 | 20 84 20 30 3c 3c 32 38 |flags(q)| . 0<<28|
|00002650| 20 84 20 37 3c 3c 32 34 | 0d 0d b6 1f 20 20 20 20 | . 7<<24|.... |
|00002660| e7 20 28 66 6c 61 67 73 | 28 71 29 20 80 20 26 31 |. (flags|(q) . &1|
|00002670| 30 30 29 3d 30 20 8c 0d | 0d c0 20 20 20 20 20 20 |00)=0 ..|.. |
|00002680| 20 24 28 69 74 65 6d 70 | 74 72 2b 31 32 29 3d 74 | $(itemp|tr+12)=t|
|00002690| 65 78 74 24 28 71 29 0d | 0d ca 09 20 20 20 20 cc |ext$(q).|... .|
|000026a0| 0d 0d d4 1c 20 20 20 20 | 20 20 70 6f 73 3d a7 74 |.... | pos=.t|
|000026b0| 65 78 74 24 28 71 29 2c | 22 28 22 29 0d 0d de 28 |ext$(q),|"(")...(|
|000026c0| 20 20 20 20 20 20 69 74 | 65 6d 70 74 72 21 31 32 | it|emptr!12|
|000026d0| 3d a0 28 c0 74 65 78 74 | 24 28 71 29 2c 70 6f 73 |=.(.text|$(q),pos|
|000026e0| 2d 31 29 29 0d 0d e8 17 | 20 20 20 20 20 20 69 74 |-1))....| it|
|000026f0| 65 6d 70 74 72 21 31 36 | 3d 2d 31 0d 0d f2 32 20 |emptr!16|=-1...2 |
|00002700| 20 20 20 20 20 69 74 65 | 6d 70 74 72 21 32 30 3d | ite|mptr!20=|
|00002710| a0 28 c2 74 65 78 74 24 | 28 71 29 2c a9 28 74 65 |.(.text$|(q),.(te|
|00002720| 78 74 24 28 71 29 29 2d | 70 6f 73 29 29 0d 0d fc |xt$(q))-|pos))...|
|00002730| 09 20 20 20 20 cd 0d 0e | 06 18 20 20 20 20 69 74 |. ...|.. it|
|00002740| 65 6d 70 74 72 2b 3d 32 | 34 3a 71 2b 3d 31 0d 0e |emptr+=2|4:q+=1..|
|00002750| 10 1e 20 20 fd 20 28 73 | 65 74 74 69 6e 67 28 71 |.. . (s|etting(q|
|00002760| 2d 31 29 20 80 20 26 38 | 30 29 3e 30 0d 0e 1a 11 |-1) . &8|0)>0....|
|00002770| 20 20 6d 62 25 3d 69 74 | 65 6d 70 74 72 0d 0e 24 | mb%=it|emptr..$|
|00002780| 23 20 20 e7 20 71 3c 3e | 6e 20 8c 20 74 69 74 6c |# . q<>|n . titl|
|00002790| 65 24 3d 74 65 78 74 24 | 28 71 29 3a 71 2b 3d 31 |e$=text$|(q):q+=1|
|000027a0| 0d 0e 2e 09 fd 20 71 3d | 6e 0d 0e 38 04 0d 0e 42 |..... q=|n..8...B|
|000027b0| 0f e3 20 71 3d 30 20 b8 | 20 6e 2d 31 0d 0e 4c 29 |.. q=0 .| n-1..L)|
|000027c0| 20 20 e7 20 73 75 62 6d | 65 6e 75 28 71 29 3e 30 | . subm|enu(q)>0|
|000027d0| 20 80 20 73 75 62 6d 65 | 6e 75 28 71 29 3c 6d 65 | . subme|nu(q)<me|
|000027e0| 6e 75 73 20 8c 0d 0e 56 | 23 20 20 20 20 21 72 65 |nus ...V|# !re|
|000027f0| 66 28 71 29 3d 6d 65 6e | 75 70 6f 73 28 73 75 62 |f(q)=men|upos(sub|
|00002800| 6d 65 6e 75 28 71 29 29 | 0d 0e 60 07 20 20 cc 0d |menu(q))|..`. ..|
|00002810| 0e 6a 48 20 20 20 20 21 | 72 65 66 28 71 29 3d 73 |.jH !|ref(q)=s|
|00002820| 75 62 6d 65 6e 75 28 71 | 29 3a f4 20 77 61 73 20 |ubmenu(q|):. was |
|00002830| 2d 31 20 69 2e 65 2e 20 | 73 75 62 6d 65 6e 75 20 |-1 i.e. |submenu |
|00002840| 64 69 73 61 6c 6c 6f 77 | 65 64 21 20 54 68 69 73 |disallow|ed! This|
|00002850| 20 63 68 61 6e 67 65 0d | 0e 74 3e 20 20 20 20 20 | change.|.t> |
|00002860| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002870| 20 3a f4 20 61 6c 6c 6f | 77 73 20 61 20 77 69 6e | :. allo|ws a win|
|00002880| 64 6f 77 20 68 61 6e 64 | 6c 65 20 74 6f 20 62 65 |dow hand|le to be|
|00002890| 20 75 73 65 64 0d 0e 7e | 07 20 20 cd 0d 0e 88 07 | used..~|. .....|
|000028a0| ed 20 71 0d 0e 92 23 c8 | 99 20 22 57 69 6d 70 5f |. q...#.|. "Wimp_|
|000028b0| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 6d 65 6e |CreateMe|nu",,men|
|000028c0| 75 25 2c 78 2c 79 0d 0e | 9c 05 e1 0d 0e a6 04 0d |u%,x,y..|........|
|000028d0| 0e b0 1d dd f2 6f 70 65 | 6e 74 65 6d 70 6c 61 74 |.....ope|ntemplat|
|000028e0| 65 66 69 6c 65 28 46 49 | 4c 45 24 29 0d 0e ba 21 |efile(FI|LE$)...!|
|000028f0| c8 99 20 22 57 69 6d 70 | 5f 4f 70 65 6e 54 65 6d |.. "Wimp|_OpenTem|
|00002900| 70 6c 61 74 65 22 2c 2c | 46 49 4c 45 24 0d 0e c4 |plate",,|FILE$...|
|00002910| 05 e1 0d 0e ce 04 0d 0e | d8 19 dd f2 6c 6f 61 64 |........|....load|
|00002920| 74 65 6d 70 6c 61 74 65 | 28 6e 61 6d 65 24 29 0d |template|(name$).|
|00002930| 0e e2 13 ea 20 74 79 70 | 65 25 2c 70 6f 73 25 2c |.... typ|e%,pos%,|
|00002940| 78 25 0d 0e ec 4c c8 99 | 20 22 57 69 6d 70 5f 4c |x%...L..| "Wimp_L|
|00002950| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 71 25 |oadTempl|ate",,q%|
|00002960| 2c 69 70 74 72 25 2c 69 | 65 6e 64 25 2c 2d 31 2c |,iptr%,i|end%,-1,|
|00002970| 6e 61 6d 65 24 2c 30 20 | b8 20 74 79 70 65 25 2c |name$,0 |. type%,|
|00002980| 2c 69 70 74 72 25 2c 2c | 2c 2c 70 6f 73 25 0d 0e |,iptr%,,|,,pos%..|
|00002990| f6 05 e1 0d 0f 00 04 0d | 0f 0a 17 dd f2 63 6c 6f |........|.....clo|
|000029a0| 73 65 74 65 6d 70 6c 61 | 74 65 66 69 6c 65 0d 0f |setempla|tefile..|
|000029b0| 14 1b c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |.... "Wi|mp_Close|
|000029c0| 54 65 6d 70 6c 61 74 65 | 22 0d 0f 1e 05 e1 0d 0f |Template|".......|
|000029d0| 28 04 0d 0f 32 22 dd f2 | 6d 6f 75 73 65 5f 72 65 |(...2"..|mouse_re|
|000029e0| 63 74 61 6e 67 6c 65 28 | 78 25 2c 79 25 2c 77 25 |ctangle(|x%,y%,w%|
|000029f0| 2c 68 25 29 0d 0f 3c 15 | c8 97 20 c8 93 20 78 25 |,h%)..<.|.. .. x%|
|00002a00| 2c 79 25 2c 77 25 2c 68 | 25 0d 0f 46 05 e1 0d 0f |,y%,w%,h|%..F....|
|00002a10| 50 04 0d 0f 5a 1d dd f2 | 6d 6f 75 73 65 5f 6c 69 |P...Z...|mouse_li|
|00002a20| 6d 69 74 28 62 2c 77 68 | 61 6e 64 6c 65 25 29 0d |mit(b,wh|andle%).|
|00002a30| 0f 64 2c 62 21 30 3d 77 | 68 61 6e 64 6c 65 25 3a |.d,b!0=w|handle%:|
|00002a40| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |.. "Wimp|_GetWind|
|00002a50| 6f 77 53 74 61 74 65 22 | 2c 2c 62 0d 0f 6e 2f f2 |owState"|,,b..n/.|
|00002a60| 6d 6f 75 73 65 5f 72 65 | 63 74 61 6e 67 6c 65 28 |mouse_re|ctangle(|
|00002a70| 62 21 34 2c 62 21 38 2c | 62 21 31 32 2d 62 21 34 |b!4,b!8,|b!12-b!4|
|00002a80| 2c 62 21 31 36 2d 62 21 | 38 29 0d 0f 78 05 e1 0d |,b!16-b!|8)..x...|
|00002a90| 0f 82 04 0d 0f 8c 14 dd | f2 64 65 6c 61 79 28 73 |........|.delay(s|
|00002aa0| 65 63 6f 6e 64 73 29 0d | 0f 96 0a ea 20 74 69 6d |econds).|.... tim|
|00002ab0| 65 0d 0f a0 1e 74 69 6d | 65 20 3d 20 91 20 2b 20 |e....tim|e = . + |
|00002ac0| 28 73 65 63 6f 6e 64 73 | 20 2a 20 31 30 30 29 0d |(seconds| * 100).|
|00002ad0| 0f aa 05 f5 0d 0f b4 0e | fd 20 91 20 3e 20 74 69 |........|. . > ti|
|00002ae0| 6d 65 0d 0f be 05 e1 0d | 0f c8 04 0d 0f d2 19 dd |me......|........|
|00002af0| a4 75 70 70 65 72 5f 63 | 61 73 65 28 73 74 72 69 |.upper_c|ase(stri|
|00002b00| 6e 67 24 29 0d 0f dc 0b | ea 20 6c 6f 6f 70 25 0d |ng$)....|. loop%.|
|00002b10| 0f e6 16 e7 20 a9 28 73 | 74 72 69 6e 67 24 29 20 |.... .(s|tring$) |
|00002b20| 3e 20 30 20 8c 0d 0f f0 | 1d 20 e3 20 6c 6f 6f 70 |> 0 ....|. . loop|
|00002b30| 25 20 3d 20 31 20 b8 20 | a9 28 73 74 72 69 6e 67 |% = 1 . |.(string|
|00002b40| 24 29 0d 0f fa 3a 20 20 | 20 e7 20 c1 73 74 72 69 |$)...: | . .stri|
|00002b50| 6e 67 24 2c 6c 6f 6f 70 | 25 2c 31 29 3e 3d 22 61 |ng$,loop|%,1)>="a|
|00002b60| 22 20 80 20 c1 73 74 72 | 69 6e 67 24 2c 6c 6f 6f |" . .str|ing$,loo|
|00002b70| 70 25 2c 31 29 3c 3d 22 | 7a 22 20 8c 0d 10 04 3a |p%,1)<="|z" ....:|
|00002b80| 20 20 20 20 20 c1 73 74 | 72 69 6e 67 24 2c 6c 6f | .st|ring$,lo|
|00002b90| 6f 70 25 2c 31 29 20 3d | 20 bd 28 97 28 c1 73 74 |op%,1) =| .(.(.st|
|00002ba0| 72 69 6e 67 24 2c 6c 6f | 6f 70 25 2c 31 29 29 20 |ring$,lo|op%,1)) |
|00002bb0| 80 20 26 44 46 29 0d 10 | 0e 08 20 20 20 cd 0d 10 |. &DF)..|.. ...|
|00002bc0| 18 0c 20 ed 20 6c 6f 6f | 70 25 0d 10 22 05 cd 0d |.. . loo|p%.."...|
|00002bd0| 10 2c 0d 3d 20 73 74 72 | 69 6e 67 24 0d 10 36 04 |.,.= str|ing$..6.|
|00002be0| 0d 10 40 27 dd f2 57 69 | 6e 64 6f 77 5f 52 65 54 |..@'..Wi|ndow_ReT|
|00002bf0| 69 74 6c 65 28 62 2c 77 | 68 61 6e 64 6c 65 25 2c |itle(b,w|handle%,|
|00002c00| 74 69 74 6c 65 24 29 0d | 10 4a 0b ea 20 77 6f 62 |title$).|.J.. wob|
|00002c10| 6c 6b 0d 10 54 0d de 20 | 77 6f 62 6c 6b 20 35 0d |lk..T.. |woblk 5.|
|00002c20| 10 5e 10 62 21 30 3d 77 | 68 61 6e 64 6c 65 25 0d |.^.b!0=w|handle%.|
|00002c30| 10 68 1e c8 99 20 22 57 | 69 6d 70 5f 47 65 74 57 |.h... "W|imp_GetW|
|00002c40| 69 6e 64 6f 77 49 6e 66 | 6f 22 2c 2c 62 0d 10 72 |indowInf|o",,b..r|
|00002c50| 15 24 28 21 28 62 2b 37 | 36 29 29 3d 74 69 74 6c |.$(!(b+7|6))=titl|
|00002c60| 65 24 0d 10 7c 14 77 6f | 62 6c 6b 21 30 3d 77 68 |e$..|.wo|blk!0=wh|
|00002c70| 61 6e 64 6c 65 25 0d 10 | 86 25 c8 99 20 22 57 69 |andle%..|.%.. "Wi|
|00002c80| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 4f 75 74 6c |mp_GetWi|ndowOutl|
|00002c90| 69 6e 65 22 2c 2c 77 6f | 62 6c 6b 0d 10 90 44 c8 |ine",,wo|blk...D.|
|00002ca0| 99 20 22 57 69 6d 70 5f | 46 6f 72 63 65 52 65 64 |. "Wimp_|ForceRed|
|00002cb0| 72 61 77 22 2c 2d 31 2c | 77 6f 62 6c 6b 21 34 2c |raw",-1,|woblk!4,|
|00002cc0| 28 77 6f 62 6c 6b 21 31 | 36 29 2d 34 30 2c 77 6f |(woblk!1|6)-40,wo|
|00002cd0| 62 6c 6b 21 31 32 2c 77 | 6f 62 6c 6b 21 31 36 0d |blk!12,w|oblk!16.|
|00002ce0| 10 9a 05 e1 0d 10 a4 04 | 0d 10 ae 11 dd a4 6c 65 |........|......le|
|00002cf0| 61 66 28 70 61 74 68 24 | 29 0d 10 b8 12 c8 95 20 |af(path$|)...... |
|00002d00| a7 70 61 74 68 24 2c 22 | 2e 22 29 0d 10 c2 21 20 |.path$,"|.")...! |
|00002d10| 20 70 61 74 68 24 3d c1 | 70 61 74 68 24 2c a7 70 | path$=.|path$,.p|
|00002d20| 61 74 68 24 2c 22 2e 22 | 29 2b 31 29 0d 10 cc 05 |ath$,"."|)+1)....|
|00002d30| ce 0d 10 d6 0a 3d 70 61 | 74 68 24 0d 10 e0 04 0d |.....=pa|th$.....|
|00002d40| 10 ea 10 dd a4 67 6e 61 | 6d 65 28 70 74 72 29 0d |.....gna|me(ptr).|
|00002d50| 10 f4 09 66 24 3d 22 22 | 0d 10 fe 19 c8 95 20 3f |...f$=""|...... ?|
|00002d60| 70 74 72 3c 3e 30 20 80 | 20 3f 70 74 72 3c 3e 31 |ptr<>0 .| ?ptr<>1|
|00002d70| 33 0d 11 08 18 20 20 66 | 24 3d 66 24 2b bd 3f 70 |3.... f|$=f$+.?p|
|00002d80| 74 72 3a 70 74 72 2b 3d | 31 0d 11 12 05 ce 0d 11 |tr:ptr+=|1.......|
|00002d90| 1c 07 3d 66 24 0d 11 26 | 04 0d 11 30 1a dd a4 66 |..=f$..&|...0...f|
|00002da0| 69 6c 65 5f 6c 65 6e 67 | 74 68 28 6f 62 6a 65 63 |ile_leng|th(objec|
|00002db0| 74 24 29 0d 11 3a 37 ea | 20 74 79 70 65 25 2c 6c |t$)..:7.| type%,l|
|00002dc0| 6f 61 64 5f 61 64 64 72 | 25 2c 65 78 65 63 5f 61 |oad_addr|%,exec_a|
|00002dd0| 64 64 72 25 2c 6c 65 6e | 67 74 68 25 2c 61 74 74 |ddr%,len|gth%,att|
|00002de0| 73 25 2c 73 74 72 69 6e | 67 24 0d 11 44 47 c8 99 |s%,strin|g$..DG..|
|00002df0| 20 22 4f 53 5f 46 69 6c | 65 22 2c 35 2c 6f 62 6a | "OS_Fil|e",5,obj|
|00002e00| 65 63 74 24 20 b8 20 74 | 79 70 65 25 2c 2c 6c 6f |ect$ . t|ype%,,lo|
|00002e10| 61 64 5f 61 64 64 72 25 | 2c 65 78 65 63 5f 61 64 |ad_addr%|,exec_ad|
|00002e20| 64 72 25 2c 6c 65 6e 67 | 74 68 25 2c 61 74 74 73 |dr%,leng|th%,atts|
|00002e30| 25 0d 11 4e 0c 3d 6c 65 | 6e 67 74 68 25 0d 11 58 |%..N.=le|ngth%..X|
|00002e40| 04 0d 11 62 13 dd a4 66 | 69 6c 65 5f 64 61 74 65 |...b...f|ile_date|
|00002e50| 28 46 24 29 0d 11 6c 0e | ea 20 4c 25 2c 41 25 2c |(F$)..l.|. L%,A%,|
|00002e60| 54 25 0d 11 76 17 24 66 | 62 75 66 66 65 72 25 3d |T%..v.$f|buffer%=|
|00002e70| c4 32 38 2c bd 28 30 29 | 29 0d 11 80 2f c8 99 20 |.28,.(0)|).../.. |
|00002e80| 22 4f 53 5f 46 69 6c 65 | 22 2c 35 2c 46 24 20 b8 |"OS_File|",5,F$ .|
|00002e90| 20 54 25 2c 2c 6c 61 64 | 64 72 25 2c 65 61 64 64 | T%,,lad|dr%,eadd|
|00002ea0| 72 25 2c 4c 25 2c 41 25 | 0d 11 8a 3b f4 20 6c 6f |r%,L%,A%|...;. lo|
|00002eb0| 61 64 20 61 6e 64 20 65 | 78 65 63 75 74 69 6f 6e |ad and e|xecution|
|00002ec0| 20 61 64 64 72 65 73 73 | 65 73 20 61 72 65 2c 20 | address|es are, |
|00002ed0| 69 6e 20 66 61 63 74 2c | 20 74 69 6d 65 20 73 74 |in fact,| time st|
|00002ee0| 61 6d 70 0d 11 94 19 66 | 64 61 74 65 25 3f 34 3d |amp....f|date%?4=|
|00002ef0| 6c 61 64 64 72 25 20 80 | 20 26 46 46 0d 11 9e 1d |laddr% .| &FF....|
|00002f00| 66 64 61 74 65 25 3f 33 | 3d 65 61 64 64 72 25 3e |fdate%?3|=eaddr%>|
|00002f10| 3e 32 34 20 80 20 26 46 | 46 0d 11 a8 1d 66 64 61 |>24 . &F|F....fda|
|00002f20| 74 65 25 3f 32 3d 65 61 | 64 64 72 25 3e 3e 31 36 |te%?2=ea|ddr%>>16|
|00002f30| 20 80 20 26 46 46 0d 11 | b2 1d 66 64 61 74 65 25 | . &FF..|..fdate%|
|00002f40| 3f 31 3d 65 61 64 64 72 | 25 3e 3e 38 20 20 80 20 |?1=eaddr|%>>8 . |
|00002f50| 26 46 46 0d 11 bc 1d 66 | 64 61 74 65 25 3f 30 3d |&FF....f|date%?0=|
|00002f60| 65 61 64 64 72 25 20 20 | 20 20 20 80 20 26 46 46 |eaddr% | . &FF|
|00002f70| 0d 11 c6 3c c8 99 20 22 | 4f 53 5f 43 6f 6e 76 65 |...<.. "|OS_Conve|
|00002f80| 72 74 53 74 61 6e 64 61 | 72 64 44 61 74 65 41 6e |rtStanda|rdDateAn|
|00002f90| 64 54 69 6d 65 22 2c 20 | 66 64 61 74 65 25 2c 20 |dTime", |fdate%, |
|00002fa0| 66 62 75 66 66 65 72 25 | 2c 20 32 38 0d 11 d0 0e |fbuffer%|, 28....|
|00002fb0| 3d 24 66 62 75 66 66 65 | 72 25 0d 11 da 04 0d 11 |=$fbuffe|r%......|
|00002fc0| e4 19 dd a4 75 70 70 65 | 72 5f 63 61 73 65 28 73 |....uppe|r_case(s|
|00002fd0| 74 72 69 6e 67 24 29 0d | 11 ee 0b ea 20 6c 6f 6f |tring$).|.... loo|
|00002fe0| 70 25 0d 11 f8 16 e7 20 | a9 28 73 74 72 69 6e 67 |p%..... |.(string|
|00002ff0| 24 29 20 3e 20 30 20 8c | 0d 12 02 1d 20 e3 20 6c |$) > 0 .|.... . l|
|00003000| 6f 6f 70 25 20 3d 20 31 | 20 b8 20 a9 28 73 74 72 |oop% = 1| . .(str|
|00003010| 69 6e 67 24 29 0d 12 0c | 3a 20 20 20 e7 20 c1 73 |ing$)...|: . .s|
|00003020| 74 72 69 6e 67 24 2c 6c | 6f 6f 70 25 2c 31 29 3e |tring$,l|oop%,1)>|
|00003030| 3d 22 61 22 20 80 20 c1 | 73 74 72 69 6e 67 24 2c |="a" . .|string$,|
|00003040| 6c 6f 6f 70 25 2c 31 29 | 3c 3d 22 7a 22 20 8c 0d |loop%,1)|<="z" ..|
|00003050| 12 16 3a 20 20 20 20 20 | c1 73 74 72 69 6e 67 24 |..: |.string$|
|00003060| 2c 6c 6f 6f 70 25 2c 31 | 29 20 3d 20 bd 28 97 28 |,loop%,1|) = .(.(|
|00003070| c1 73 74 72 69 6e 67 24 | 2c 6c 6f 6f 70 25 2c 31 |.string$|,loop%,1|
|00003080| 29 29 20 80 20 26 44 46 | 29 0d 12 20 08 20 20 20 |)) . &DF|).. . |
|00003090| cd 0d 12 2a 0c 20 ed 20 | 6c 6f 6f 70 25 0d 12 34 |...*. . |loop%..4|
|000030a0| 05 cd 0d 12 3e 0d 3d 20 | 73 74 72 69 6e 67 24 0d |....>.= |string$.|
|000030b0| 12 48 04 0d 12 52 4c f4 | 20 2d 2d 2d 2d 2d 2d 2d |.H...RL.| -------|
|000030c0| 2d 2d 2d 2d 20 52 6f 75 | 74 69 6e 65 73 20 74 6f |---- Rou|tines to|
|000030d0| 20 63 72 65 61 74 65 20 | 61 20 62 75 66 66 65 72 | create |a buffer|
|000030e0| 20 61 72 65 61 20 69 6e | 20 74 68 65 20 52 4d 41 | area in| the RMA|
|000030f0| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d | -------|-------.|
|00003100| 12 5c 04 0d 12 66 15 dd | a4 42 75 66 66 5f 43 72 |.\...f..|.Buff_Cr|
|00003110| 65 61 74 65 28 6c 25 29 | 0d 12 70 0e ea 20 66 25 |eate(l%)|..p.. f%|
|00003120| 2c 70 25 2c 6e 25 0d 12 | 7a 25 e7 20 6c 25 83 34 |,p%,n%..|z%. l%.4|
|00003130| 3c 3e 30 20 8c 20 6e 25 | 3d 28 6c 25 81 34 2b 31 |<>0 . n%|=(l%.4+1|
|00003140| 29 2a 34 20 8b 20 6e 25 | 3d 6c 25 0d 12 84 23 c8 |)*4 . n%|=l%...#.|
|00003150| 99 20 22 4f 53 5f 4d 6f | 64 75 6c 65 22 2c 36 2c |. "OS_Mo|dule",6,|
|00003160| 2c 2c 6e 25 20 b8 20 2c | 2c 70 25 3b 66 25 0d 12 |,,n% . ,|,p%;f%..|
|00003170| 8e 14 e7 20 28 66 25 80 | 31 29 3c 3e a3 20 8c 20 |... (f%.|1)<>. . |
|00003180| 3d 30 0d 12 98 0a 21 70 | 25 3d 6c 25 0d 12 a2 07 |=0....!p|%=l%....|
|00003190| 3d 70 25 0d 12 ac 04 0d | 12 b6 14 dd f2 42 75 66 |=p%.....|.....Buf|
|000031a0| 66 5f 53 63 72 61 70 28 | 70 25 29 0d 12 c0 18 c8 |f_Scrap(|p%).....|
|000031b0| 99 20 22 4f 53 5f 4d 6f | 64 75 6c 65 22 2c 37 2c |. "OS_Mo|dule",7,|
|000031c0| 2c 70 25 0d 12 ca 05 e1 | 0d 12 d4 04 0d 12 de 1b |,p%.....|........|
|000031d0| dd f2 42 75 66 66 5f 45 | 6e 6c 61 72 67 65 28 f8 |..Buff_E|nlarge(.|
|000031e0| 20 70 25 2c 6c 25 29 0d | 12 e8 08 ea 20 6e 25 0d | p%,l%).|.... n%.|
|000031f0| 12 f2 1f e7 20 70 25 3d | 30 20 8c 20 70 25 3d a4 |.... p%=|0 . p%=.|
|00003200| 42 75 66 66 5f 43 72 65 | 61 74 65 28 34 29 0d 12 |Buff_Cre|ate(4)..|
|00003210| fc 17 6e 25 3d a4 42 75 | 66 66 5f 43 72 65 61 74 |..n%=.Bu|ff_Creat|
|00003220| 65 28 6c 25 29 0d 13 06 | 0d e7 20 6e 25 3c 3e 30 |e(l%)...|.. n%<>0|
|00003230| 20 8c 0d 13 10 17 20 20 | f2 42 75 66 66 5f 43 6f | ..... |.Buff_Co|
|00003240| 70 79 28 70 25 2c 6e 25 | 29 0d 13 1a 15 20 20 f2 |py(p%,n%|).... .|
|00003250| 42 75 66 66 5f 53 63 72 | 61 70 28 70 25 29 0d 13 |Buff_Scr|ap(p%)..|
|00003260| 24 0b 20 20 70 25 3d 6e | 25 0d 13 2e 05 cc 0d 13 |$. p%=n|%.......|
|00003270| 38 0a 20 20 70 25 3d 30 | 0d 13 42 05 cd 0d 13 4c |8. p%=0|..B....L|
|00003280| 05 e1 0d 13 56 04 0d 13 | 60 16 dd f2 42 75 66 66 |....V...|`...Buff|
|00003290| 5f 43 6f 70 79 28 70 25 | 2c 6e 25 29 0d 13 6a 08 |_Copy(p%|,n%)..j.|
|000032a0| ea 20 69 25 0d 13 74 48 | e7 21 70 25 3e 21 6e 25 |. i%..tH|.!p%>!n%|
|000032b0| 20 8c 20 85 20 31 30 31 | 2c 22 45 52 52 4f 52 20 | . . 101|,"ERROR |
|000032c0| 2d 20 42 75 66 66 65 72 | 20 74 6f 6f 20 73 6d 61 |- Buffer| too sma|
|000032d0| 6c 6c 2c 20 69 6e 20 42 | 75 66 66 5f 43 6f 70 79 |ll, in B|uff_Copy|
|000032e0| 20 50 72 6f 63 65 64 75 | 72 65 3b 22 0d 13 7e 58 | Procedu|re;"..~X|
|000032f0| e7 21 70 25 83 34 3c 3e | 30 20 8c 20 85 20 31 30 |.!p%.4<>|0 . . 10|
|00003300| 32 2c 22 45 52 52 4f 52 | 20 2d 20 42 75 66 66 65 |2,"ERROR| - Buffe|
|00003310| 72 20 73 69 7a 65 20 6e | 6f 74 20 61 20 6d 75 6c |r size n|ot a mul|
|00003320| 74 69 70 6c 65 20 6f 66 | 20 34 2c 20 69 6e 20 42 |tiple of| 4, in B|
|00003330| 75 66 66 5f 43 6f 70 79 | 20 50 72 6f 63 65 64 75 |uff_Copy| Procedu|
|00003340| 72 65 3b 22 0d 13 88 16 | e3 20 69 25 3d 34 20 b8 |re;"....|. i%=4 .|
|00003350| 20 21 70 25 2d 31 20 88 | 20 34 0d 13 92 11 20 20 | !p%-1 .| 4.... |
|00003360| 6e 25 21 69 25 3d 70 25 | 21 69 25 0d 13 9c 08 ed |n%!i%=p%|!i%.....|
|00003370| 20 69 25 0d 13 a6 05 e1 | 0d 13 b0 04 0d 13 ba 1c | i%.....|........|
|00003380| dd a4 42 75 66 66 5f 66 | 69 6c 65 6c 6f 61 64 28 |..Buff_f|ileload(|
|00003390| 6e 24 2c f8 20 62 25 29 | 0d 13 c4 14 ea 20 74 25 |n$,. b%)|..... t%|
|000033a0| 2c 6c 25 2c 65 25 2c 6e | 25 2c 72 25 0d 13 ce 21 |,l%,e%,n|%,r%...!|
|000033b0| c8 99 22 4f 53 5f 46 69 | 6c 65 22 2c 35 2c 6e 24 |.."OS_Fi|le",5,n$|
|000033c0| 20 b8 20 72 25 2c 2c 74 | 25 2c 2c 6c 25 0d 13 d8 | . r%,,t|%,,l%...|
|000033d0| 0e 65 25 3d 6c 25 2b 26 | 34 30 30 0d 13 e2 23 e7 |.e%=l%+&|400...#.|
|000033e0| 20 65 25 3e 21 62 25 20 | 8c 20 f2 42 75 66 66 5f | e%>!b% |. .Buff_|
|000033f0| 45 6e 6c 61 72 67 65 28 | 62 25 2c 65 25 29 0d 13 |Enlarge(|b%,e%)..|
|00003400| ec 0f e7 20 62 25 3d 30 | 20 8c 20 3d 30 0d 13 f6 |... b%=0| . =0...|
|00003410| 33 62 25 21 34 3d 6c 25 | 3a c8 99 20 22 4f 53 5f |3b%!4=l%|:.. "OS_|
|00003420| 46 69 6c 65 22 2c 32 35 | 35 2c 6e 24 2c 62 25 2b |File",25|5,n$,b%+|
|00003430| 38 2c 30 3a 21 28 62 25 | 2b 6c 25 2b 38 29 3d 30 |8,0:!(b%|+l%+8)=0|
|00003440| 0d 14 00 09 3d 62 25 2b | 34 0d 14 0a 20 dd f2 6b |....=b%+|4... ..k|
|00003450| 65 79 70 72 65 73 73 5f | 6d 61 69 6e 77 28 69 63 |eypress_|mainw(ic|
|00003460| 6f 6e 25 2c 6b 65 79 25 | 29 0d 14 14 04 0d 14 1e |on%,key%|).......|
|00003470| 05 e1 0d 14 28 0a dd f2 | 64 72 61 77 0d 14 32 0a |....(...|draw..2.|
|00003480| f2 53 57 61 76 65 0d 14 | 3c 05 e1 0d 14 46 04 0d |.SWave..|<....F..|
|00003490| 14 50 31 dd a4 6f 73 5f | 56 61 72 47 65 74 56 61 |.P1..os_|VarGetVa|
|000034a0| 6c 28 62 75 66 66 65 72 | 25 2c 73 69 7a 65 25 2c |l(buffer|%,size%,|
|000034b0| 76 61 72 6e 61 6d 65 24 | 2c 65 78 70 61 6e 64 29 |varname$|,expand)|
|000034c0| 0d 14 5a 25 ea 20 76 61 | 6c 75 65 24 2c 6e 72 5f |..Z%. va|lue$,nr_|
|000034d0| 62 79 74 65 73 25 2c 6e | 61 6d 65 70 74 72 25 2c |bytes%,n|ameptr%,|
|000034e0| 6c 6f 6f 70 25 0d 14 64 | 5b c8 99 20 22 58 4f 53 |loop%..d|[.. "XOS|
|000034f0| 5f 52 65 61 64 56 61 72 | 56 61 6c 22 2c 76 61 72 |_ReadVar|Val",var|
|00003500| 6e 61 6d 65 24 2c 62 75 | 66 66 65 72 25 2c 73 69 |name$,bu|ffer%,si|
|00003510| 7a 65 25 2c 30 2c 2d 33 | 2a 28 65 78 70 61 6e 64 |ze%,0,-3|*(expand|
|00003520| 3d b9 29 20 b8 20 2c 2c | 6e 72 5f 62 79 74 65 73 |=.) . ,,|nr_bytes|
|00003530| 25 2c 6e 61 6d 65 70 74 | 72 25 2c 74 79 70 65 25 |%,namept|r%,type%|
|00003540| 0d 14 6e 1b e3 20 6c 6f | 6f 70 25 3d 30 20 b8 20 |..n.. lo|op%=0 . |
|00003550| 6e 72 5f 62 79 74 65 73 | 25 2d 31 0d 14 78 33 20 |nr_bytes|%-1..x3 |
|00003560| 20 76 61 6c 75 65 24 3d | 76 61 6c 75 65 24 2b bd | value$=|value$+.|
|00003570| 28 6e 61 6d 65 70 74 72 | 25 3f 28 6c 6f 6f 70 25 |(nameptr|%?(loop%|
|00003580| 2b a9 76 61 72 6e 61 6d | 65 24 2b 33 29 29 0d 14 |+.varnam|e$+3))..|
|00003590| 82 0b ed 20 6c 6f 6f 70 | 25 0d 14 8c 0b 3d 76 61 |... loop|%....=va|
|000035a0| 6c 75 65 24 0d 14 96 04 | 0d 14 a0 0f dd f2 53 57 |lue$....|......SW|
|000035b0| 61 76 65 6d 61 6b 65 0d | 14 aa 0f e3 20 43 25 3d |avemake.|.... C%=|
|000035c0| 30 20 b8 20 34 31 0d 14 | b4 1c 20 41 28 43 25 29 |0 . 41..|.. A(C%)|
|000035d0| 3d b5 28 43 25 2f 28 47 | 2a af 2a 32 29 29 2a 31 |=.(C%/(G|*.*2))*1|
|000035e0| 32 30 0d 14 be 05 ed 0d | 14 c8 0f 20 e3 43 25 3d |20......|... .C%=|
|000035f0| 30 20 b8 20 34 31 0d 14 | d2 14 20 42 28 43 25 29 |0 . 41..|.. B(C%)|
|00003600| 3d b5 28 43 25 2f 28 af | 29 29 0d 14 dc 06 20 ed |=.(C%/(.|)).... .|
|00003610| 0d 14 e6 37 c8 99 20 22 | 4f 53 5f 53 70 72 69 74 |...7.. "|OS_Sprit|
|00003620| 65 4f 70 22 2c 35 31 32 | 2b 36 30 2c 73 70 2c 73 |eOp",512|+60,sp,s|
|00003630| 70 5f 70 74 72 31 25 2c | 30 20 b8 20 72 30 2c 72 |p_ptr1%,|0 . r0,r|
|00003640| 31 2c 72 32 2c 72 33 0d | 14 f0 05 da 0d 14 fa 20 |1,r2,r3.|....... |
|00003650| c8 99 20 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |.. "OS_S|priteOp"|
|00003660| 2c 72 30 2c 72 31 2c 72 | 32 2c 72 33 0d 15 04 05 |,r0,r1,r|2,r3....|
|00003670| e1 0d 15 0e 0b dd f2 53 | 57 61 76 65 0d 15 18 38 |.......S|Wave...8|
|00003680| c8 99 20 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |.. "OS_S|priteOp"|
|00003690| 2c 35 31 32 2b 36 30 2c | 73 70 31 2c 73 70 5f 70 |,512+60,|sp1,sp_p|
|000036a0| 74 72 31 25 2c 30 20 b8 | 20 72 30 2c 72 31 2c 72 |tr1%,0 .| r0,r1,r|
|000036b0| 32 2c 72 33 0d 15 22 0b | 44 25 3d 44 25 2b 31 0d |2,r3..".|D%=D%+1.|
|000036c0| 15 2c 0f e3 20 43 25 3d | 30 20 b8 20 34 30 0d 15 |.,.. C%=|0 . 40..|
|000036d0| 36 47 20 e7 44 25 3c 3e | 31 20 c8 99 20 22 4f 53 |6G .D%<>|1 .. "OS|
|000036e0| 5f 53 70 72 69 74 65 4f | 70 22 2c 26 32 32 32 2c |_SpriteO|p",&222,|
|000036f0| 73 70 2c 73 70 5f 70 74 | 72 32 25 2c 32 39 2a 43 |sp,sp_pt|r2%,29*C|
|00003700| 25 2c 32 38 30 2b 41 28 | 43 25 29 2a 42 28 44 25 |%,280+A(|C%)*B(D%|
|00003710| 2d 31 29 2c 30 0d 15 40 | 12 ed 3a e7 20 44 25 3d |-1),0..@|..:. D%=|
|00003720| 34 31 3a 44 25 3d 30 0d | 15 4a 20 c8 99 20 22 4f |41:D%=0.|.J .. "O|
|00003730| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 72 30 2c 72 |S_Sprite|Op",r0,r|
|00003740| 31 2c 72 32 2c 72 33 0d | 15 54 05 e1 0d 15 5e 1e |1,r2,r3.|.T....^.|
|00003750| dd f2 63 6c 69 63 6b 68 | 61 72 6d 28 62 75 74 74 |..clickh|arm(butt|
|00003760| 6f 6e 25 2c 69 63 6f 6e | 25 29 0d 15 68 0a c8 8e |on%,icon|%)..h...|
|00003770| 20 b9 20 ca 0d 15 72 15 | c9 20 28 62 75 74 74 6f | . ...r.|. (butto|
|00003780| 6e 25 20 80 20 34 29 3d | 34 0d 15 7c 06 ef 37 0d |n% . 4)=|4..|..7.|
|00003790| 15 86 25 46 25 3d bb 28 | a4 69 63 6f 6e 5f 67 65 |..%F%=.(|.icon_ge|
|000037a0| 74 64 61 74 61 28 71 25 | 21 30 2c 68 61 72 6d 25 |tdata(q%|!0,harm%|
|000037b0| 2c 30 29 29 0d 15 90 15 | 47 3d 32 2f 46 25 3a f2 |,0))....|G=2/F%:.|
|000037c0| 53 77 61 76 65 6d 61 6b | 65 0d 15 9a 05 cb 0d 15 |Swavemak|e.......|
|000037d0| a4 05 e1 0d 15 ae 1d dd | f2 6b 65 79 70 72 65 73 |........|.keypres|
|000037e0| 73 5f 68 61 72 6d 28 61 | 25 2c 62 25 2c 63 25 29 |s_harm(a|%,b%,c%)|
|000037f0| 0d 15 b8 06 ef 37 0d 15 | c2 06 20 e1 0d ff 46 69 |.....7..|.. ...Fi|
|00003800| 6c 65 44 61 74 61 82 21 | 53 70 72 69 74 65 73 00 |leData.!|Sprites.|
|00003810| ff ff 88 03 00 00 44 f9 | ff ff f7 12 d1 a8 03 00 |......D.|........|
|00003820| 8d e8 01 00 00 00 10 00 | 00 00 8c 03 00 00 7c 03 |........|......|.|
|00003830| 00 00 21 73 77 61 76 65 | 00 00 00 00 00 00 04 00 |..!swave|........|
|00003840| 00 00 11 00 00 00 00 00 | 00 00 0b 00 00 00 ac 00 |........|........|
|00003850| 00 00 14 02 00 00 0c 00 | 00 00 10 f0 f0 f0 10 f0 |........|........|
|00003860| f0 f0 10 d0 d0 d0 10 d0 | d0 d0 10 b0 b0 b0 10 b0 |........|........|
|00003870| b0 b0 10 90 90 90 10 90 | 90 90 10 70 70 70 10 70 |........|...ppp.p|
|00003880| 70 70 10 50 50 50 10 50 | 50 50 10 30 30 30 10 30 |pp.PPP.P|PP.000.0|
|00003890| 30 30 10 00 00 00 10 00 | 00 00 10 00 40 90 10 00 |00......|....@...|
|000038a0| 40 90 10 e0 e0 00 10 e0 | e0 00 10 00 c0 00 10 00 |@.......|........|
|000038b0| c0 00 10 d0 00 00 10 d0 | 00 00 10 e0 e0 b0 10 e0 |........|........|
|000038c0| e0 b0 10 50 80 00 10 50 | 80 00 10 f0 b0 00 10 f0 |...P...P|........|
|000038d0| b0 00 10 00 b0 f0 10 00 | b0 f0 11 11 11 11 11 11 |........|........|
|000038e0| 11 11 11 11 11 11 11 11 | 11 11 11 11 11 11 11 11 |........|........|
|000038f0| 11 11 11 11 11 11 11 11 | 11 11 11 11 11 11 11 11 |........|........|
|00003900| 11 11 11 11 11 11 11 11 | 11 11 11 11 11 11 11 11 |........|........|
|00003910| 11 11 11 11 11 11 11 11 | 11 11 11 11 11 11 11 11 |........|........|
|00003920| 11 11 11 11 11 11 11 11 | 11 11 00 00 00 00 00 00 |........|........|
|00003930| 00 00 00 00 00 00 00 00 | 00 00 00 17 11 11 00 11 |........|........|
|00003940| 11 11 11 11 11 11 11 11 | 11 11 11 11 11 11 71 17 |........|......q.|
|00003950| 11 11 00 11 55 11 11 11 | 11 55 11 11 11 11 55 11 |....U...|.U....U.|
|00003960| 11 11 71 17 11 11 00 51 | 11 15 11 11 51 11 15 11 |..q....Q|....Q...|
|00003970| 11 51 11 15 11 11 71 17 | 11 11 00 51 11 15 11 11 |.Q....q.|...Q....|
|00003980| 51 11 15 11 11 51 11 15 | 11 11 71 17 11 11 00 e5 |Q....Q..|..q.....|
|00003990| ee 5e ee ee e5 ee 5e ee | ee e5 ee 5e ee ee 75 17 |.^....^.|...^..u.|
|000039a0| 11 11 00 11 11 11 15 51 | 11 11 11 15 51 11 11 11 |.......Q|....Q...|
|000039b0| 15 51 71 17 11 11 00 11 | 11 11 15 51 11 11 11 15 |.Qq.....|...Q....|
|000039c0| 51 11 11 11 15 51 71 17 | 11 11 00 11 11 11 51 15 |Q....Qq.|......Q.|
|000039d0| 11 11 11 51 15 11 11 11 | 51 15 71 17 11 11 00 11 |...Q....|Q.q.....|
|000039e0| 11 11 11 11 11 11 11 11 | 11 11 11 11 11 11 71 17 |........|......q.|
|000039f0| 11 11 70 77 77 77 77 77 | 77 77 77 77 77 77 77 77 |..pwwwww|wwwwwwww|
|00003a00| 77 77 77 17 11 11 11 11 | 11 11 11 11 11 11 11 11 |www.....|........|
|00003a10| 11 11 11 11 11 11 11 11 | 11 11 11 11 11 11 11 11 |........|........|
|00003a20| 11 11 11 11 11 11 11 11 | 11 11 11 11 11 11 11 11 |........|........|
|00003a30| 11 11 11 11 11 11 11 11 | 11 11 11 11 11 11 11 11 |........|........|
|00003a40| 11 11 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003a50| 00 00 00 f0 ff ff 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003a60| 00 00 00 00 00 00 00 f0 | ff ff 00 00 00 00 00 00 |........|........|
|00003a70| 00 00 00 00 00 00 00 00 | 00 00 00 f0 ff ff 00 00 |........|........|
|00003a80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 f0 |........|........|
|00003a90| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003aa0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003ab0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003ac0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003ad0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003ae0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003af0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003b00| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003b10| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003b20| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003b30| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003b40| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003b50| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003b60| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff 00 00 |........|........|
|00003b70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 f0 |........|........|
|00003b80| ff ff 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003b90| 00 00 00 f0 ff ff 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003ba0| 00 00 00 00 00 00 00 f0 | ff ff 46 69 6c 65 44 61 |........|..FileDa|
|00003bb0| 74 61 82 53 70 72 69 74 | 65 73 00 ff ff ff 00 01 |ta.Sprit|es......|
|00003bc0| 00 00 44 f9 ff ff 17 46 | 61 12 03 00 79 fe 01 00 |..D....F|a...y...|
|00003bd0| 00 00 10 00 00 00 04 01 | 00 00 f4 00 00 00 31 00 |........|......1.|
|00003be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 31 00 |........|......1.|
|00003bf0| 00 00 00 00 00 00 1f 00 | 00 00 2c 00 00 00 2c 00 |........|..,...,.|
|00003c00| 00 00 0c 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003c10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003c20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003c30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003c40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003c50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003c60| 00 00 00 00 00 00 00 bb | bb 00 bb bb bb bb bb bb |........|........|
|00003c70| bb bb bb bb bb bb 00 bb | bb 00 00 00 00 00 00 00 |........|........|
|00003c80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003c90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003ca0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003cb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003cc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 46 69 |........|......Fi|
|00003cd0| 6c 65 44 61 74 61 82 54 | 65 6d 70 6c 61 74 65 73 |leData.T|emplates|
|00003ce0| 00 ff f0 02 00 00 44 ec | ff ff 99 4a 61 00 03 00 |......D.|...Ja...|
|00003cf0| 48 d9 ff ff ff ff 00 00 | 00 00 00 00 00 00 00 00 |H.......|........|
|00003d00| 00 00 44 00 00 00 b4 01 | 00 00 01 00 00 00 70 72 |..D.....|......pr|
|00003d10| 6f 67 49 6e 66 6f 0d 00 | 00 00 f8 01 00 00 f8 00 |ogInfo..|........|
|00003d20| 00 00 01 00 00 00 6d 61 | 69 6e 77 0d 00 00 00 00 |......ma|inw.....|
|00003d30| 00 00 00 00 00 00 8c 00 | 00 00 04 00 00 00 08 03 |........|........|
|00003d40| 00 00 dc 00 00 00 00 00 | 00 00 00 00 00 00 e5 37 |........|.......7|
|00003d50| 83 01 12 00 01 84 07 02 | 07 01 0c 0e 0c 00 00 00 |........|........|
|00003d60| 00 00 00 fc ff ff 00 05 | 00 00 00 00 00 00 3d 01 |........|......=.|
|00003d70| 00 00 00 30 00 00 01 00 | 00 00 00 00 00 00 78 01 |...0....|......x.|
|00003d80| 00 00 ff ff ff ff 13 00 | 00 00 09 00 00 00 a4 02 |........|........|
|00003d90| 00 00 34 ff ff ff 54 03 | 00 00 64 ff ff ff 3d 30 |..4...T.|..d...=0|
|00003da0| 00 b7 0d 4b 0d 74 69 74 | 6c 65 64 3e 0d fe 9a 00 |...K.tit|led>....|
|00003db0| 00 00 cc ff ff ff 76 02 | 00 00 fc ff ff ff 3d 60 |......v.|......=`|
|00003dc0| 00 07 53 57 61 76 65 0d | 0d 0d 28 00 00 00 9a 00 |..SWave.|..(.....|
|00003dd0| 00 00 98 ff ff ff 74 02 | 00 00 c8 ff ff ff 3d 61 |......t.|......=a|
|00003de0| 00 07 8b 01 00 00 ff ff | ff ff 22 00 00 00 9a 00 |........|..".....|
|00003df0| 00 00 64 ff ff ff 76 02 | 00 00 94 ff ff ff 3d 61 |..d...v.|......=a|
|00003e00| 00 07 a4 01 00 00 ff ff | ff ff 28 00 00 00 9a 00 |........|..(.....|
|00003e10| 00 00 30 ff ff ff 76 02 | 00 00 60 ff ff ff 3d 61 |..0...v.|..`...=a|
|00003e20| 00 07 b3 01 00 00 ff ff | ff ff 1e 00 00 00 3e 00 |........|......>.|
|00003e30| 00 00 d0 ff ff ff 9a 00 | 00 00 f8 ff ff ff 19 00 |........|........|
|00003e40| 00 17 4e 61 6d 65 3a 0d | 6c 65 64 3e 0d fe 0e 00 |..Name:.|led>....|
|00003e50| 00 00 9c ff ff ff 9a 00 | 00 00 c4 ff ff ff 19 00 |........|........|
|00003e60| 00 17 50 75 72 70 6f 73 | 65 3a 0d 3e 0d fe 1e 00 |..Purpos|e:.>....|
|00003e70| 00 00 68 ff ff ff 9a 00 | 00 00 90 ff ff ff 19 00 |..h.....|........|
|00003e80| 00 17 41 75 74 68 6f 72 | 3a 0d 64 3e 0d fe 0e 00 |..Author|:.d>....|
|00003e90| 00 00 38 ff ff ff 9a 00 | 00 00 60 ff ff ff 19 00 |..8.....|..`.....|
|00003ea0| 00 17 56 65 72 73 69 6f | 6e 3a 0d 3e 0d fe 41 62 |..Versio|n:.>..Ab|
|00003eb0| 6f 75 74 20 74 68 69 73 | 20 70 72 6f 67 72 61 6d |out this| program|
|00003ec0| 0d 53 74 61 6e 64 69 6e | 67 20 57 61 76 65 20 53 |.Standin|g Wave S|
|00003ed0| 69 6d 75 6c 61 74 69 6f | 6e 0d a9 20 52 6f 62 65 |imulatio|n.. Robe|
|00003ee0| 72 74 20 53 65 61 67 6f | 0d 0d 02 00 00 00 02 01 |rt Seago|........|
|00003ef0| 00 00 b2 04 00 00 96 03 | 00 00 00 00 00 00 00 00 |........|........|
|00003f00| 00 00 05 06 83 01 32 00 | 05 ff 07 02 07 00 03 01 |......2.|........|
|00003f10| 0c 00 00 00 00 00 6c fd | ff ff b0 04 00 00 00 00 |......l.|........|
|00003f20| 00 00 3d 01 00 00 00 30 | 00 00 01 00 00 00 00 00 |..=....0|........|
|00003f30| 00 00 d8 00 00 00 ff ff | ff ff 0f 00 00 00 04 00 |........|........|
|00003f40| 00 00 00 00 00 00 6c fd | ff ff b0 04 00 00 00 00 |......l.|........|
|00003f50| 00 00 1e 00 00 c7 73 63 | 72 65 65 6e 0d 00 32 00 |......sc|reen..2.|
|00003f60| 05 ff 10 00 00 00 70 fd | ff ff 30 00 00 00 a0 fd |......p.|..0.....|
|00003f70| ff ff 3d 90 01 c7 8a 0d | 00 00 30 07 00 00 32 00 |..=.....|..0...2.|
|00003f80| 05 ff 88 04 00 00 70 fd | ff ff a8 04 00 00 a0 fd |......p.|........|
|00003f90| ff ff 3d 90 01 c7 8b 0d | 00 00 30 07 00 00 32 00 |..=.....|..0...2.|
|00003fa0| 05 ff 2c 00 00 00 70 fd | ff ff 8a 04 00 00 a0 fd |..,...p.|........|
|00003fb0| ff ff 3d 61 00 07 e7 00 | 00 00 ff ff ff ff 11 00 |..=a....|........|
|00003fc0| 00 00 53 74 61 6e 64 69 | 6e 67 20 57 61 76 65 73 |..Standi|ng Waves|
|00003fd0| 0d 48 61 72 6d 6f 6e 69 | 63 20 55 70 2f 44 6f 77 |.Harmoni|c Up/Dow|
|00003fe0| 6e 0d | |n. | |
+--------+-------------------------+-------------------------+--------+--------+